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«t DE 6S02 KEMCRS « 



EEN CLUB VOOR 6XXXX GEBfiUIKERS ** DE 6502 KENNER ** - EN BLAD VOOR &XXXX 6EBRUIKERS 



De vereniging hieft liden in IMirland, Btlgit, Duitiland, 
Frankriik, Sparse, Portugal, Awrika, Zaabia, Deneaarken. 
Hit dNi van di vtrmigina in hit btvontortn van df km- 
nisuitMisseling tussen gwniiktrs van 6XXXX-CMputers, ale 

camoK-u. Me. oc-i. pearom, rin-6s, sym. pet, bsc 

ATARI, VIC-26. BASI& iOe, {WTW-CMputirt, in-2020, OSI. 
flCC 8600, ACNN ELECTfm. SV8T0I 65, PC-IM, PALLAS. NINTA 
FOmOSA, ORIC-1, STARLIGHT. CV-777, ESTATE III. «£5/66, 
KIN. MS, KENPAC SYSTEH-4, Elektuur-coAputers (JUNIOR, en 
de OCTOPUS) LASER, aaar 00k 6800, 6809 en 68000-ciwputers. 
De kennisuiUissehnq Nordt o.a. gerealiseerd door 6 aaal 
per jaar DE 6502 KENRER ti publiccren, door het houden van 
landelijke clubbijeenkoasten, door het instandhouden van 
een cafwttt-bibhothitk en door het verlmen van paper- 
Mre-service. Regionale bijeenkoasten worden door de leden 
georganisierd. 



Virtchijningidata 
DE 6502 KBiER 19 85 

derde zaterdag van 
februari, april, juni, 
augustus, oktober, decetber. 

Inlichtingen over de regio- 
bijMnksMttni 

6flrard van Roekel 
Van der Palattraat 11 - C 
3139 LK Vlaardingm 
Tel. : 010 - 351101 



Bijeenkoasten van de club 

derde zaterdag van 
januari, aaart, aei, 
septetber, noveaber. 

Redaktie-adres en inforaa 
tiet over paperttare etc. 

Uillee L. van Pelt 
Jacob Jordacmstraat IS 

2923 CX Kriapen/IJssel. 
Tel. : 01807 - 19881 



Ofl vermiging is voUedig onafhankelijk, is statutair op- 

Sericht en ingcschnven bij dt Kaaer van Koophandel en Fa- 
riiktn voor Hollands Noordtrktarticr te Alkaaar, ondir 
nuHwr 634305. 



Voorzlttiri 

Rimis Vleesch-Dubois 
FI. Night ingalestraat 212 
2037 N6 Haarlet 
Tel. i 023 - 330993 

PtnningMester: 
John F. van Sprang 
TulD 71 

2^ EV Kriepm/IJiMl. 
Ttl. i 01807 - 20989 



Sekrfftarifi 

Gert Klein 
Diedetweg 119 
6706 CM Hageningen 
Tel. « 08370 - 23646 

Redaktie DE 6502 KENNER: 
yilie« L. van Pelt 
Jacob Jordaensftraat 19 
2923 CK Kriipcn/IJtscl. 
Tf 1. 1 01807 - 19881 



Lfdtni 
Adri Hanktl 
Emin Visschedijk 
Gert van Opbroek 
Nico de Vries 
Erevoorzittcr! 
Ereleden 

Lidaaatschap : 



HardMrt/taftMrt/DQS65 

Hardiiare/softNare/DOS65 



(05490 - 51151 ) 
(05490 - 71416 ) 

(01729 - 8636 ) 

(010 - 502239) HardiMre/software/PET 
Siep de Vries 

Ki. H. de Vries - Van der Uinden 
Anton Nuiller 

HFl. W = per kalenderjaar, postreke- 
ning 3757649 t.n.v. Peroiingaeester KIN 
Stbruikcrt Club Ned. , Kriapen/IJssel. 

Advertent ies s Tarieven op aanvraag bij de redaktie. 



DE 6502 KENNER it etn uitgave van de KIM Gebruikers Club 
Nederland. Het blad wrdt verstrekt aan leden van de club. 
DE 6S02 KENNER Mrdt van kopij voorzien door laden van de 
club, bij de opaaak van etn publikatie bijgestaan door di 
rtdaiitifl. Dt inztndingtn van prograaaa's dienen voorzien te 
zijn van koaatntur in dt listings tn zo aogtlijk door Mn 
inliidina voorafgtgaan. Publikatit van ttn inztnding bete- 
ktnt nitt dat dt rtdaktia of htt btstuur enioe aansprakt- 
lijkheid aanvaardt voor de toepassing ervan. De inzendingen 
kumten geschieden in asseablv-source-listings, in Basic, in 
Basicode, Forth, Focal, Coaal, Pascal, Fortran, Cobol, Logo 
Elan, etc. etc. 

De leden schri jven 00k artikelen over de door hen ontHikkel 
de hardNare en/of aanpassingen daarop. Zij schrijven tevens 
artikelen van algeaene aard of reageren op publikaties van 
andere inzenders. 

DE 6502 KDKR IS EEN BLAD VAN EN DOOR DE LEDEN 

Micro-flDE flsseabler/Disasseabler/Editor is een produkt van 
Micro Hare Ltd., qeschreven door Peter Jennings en bestead 
voor alle 6502-co<iputer5. De KIM Bebruikers Club Ned. heeft 
de copyrights vertrarven nadat ons lid Sebo Woldringh de 4 K 
KIN-1 versie uitbreidde tot 8 K KIM-1 versie. Adri Hankel 
paste deze aan voor de JUNIOR. Hi Ilea L. van Pelt stelde 
een nieuite 8 K source-listing voor de JUNIOR saaen, 
De iapleaentat ie op andere systeaen dan de KIM-1 en JUNIOR 
kan ttnvoudig gibeuren door het aanpassen van de I/O-adres- 
sen, HeIke in de source-listing geaakkelijke te vinden zijn 

FATE Foraat-lister/cond. Asstabler/Tape-utilities/Editor is 
de door ons lid Rob Banen geschreven source-listing van een 
12 K universeel systeea voor de JUNIOR-coaputer aan de hand 
van het universele disk operating systea van de fa. Proton 
Eltctronics ta Naardtn, nu otschikt voor t«erken aet tapes. 
FATE wordt beschikbaar gesteld aet toesteaaing van Proton. 

In dt tdltlH van DE 6502 KENNER wrden regelaatig aedede- 
lingen gedaan over de door de club geor^aniseerde bijeen- 
koasttn. Ook wrden bestuurlijke aededelingen gedaan, naast 
inforaaties over hetgeen in de handel te koop is. Leden die 
itts tt koop htbbtn of lets zoeken kunnen dit in de edities 
van DE 6502 KENNER bekend aaken. Ook worden brieven aan de 
redaktie gepubliceerd, evenals soecifieke vragen van leden. 
De edities aorden saaengesteld op basis van een groot aan- 
tal prlorittittn, atlkt door een redaktievergadenng worden 
gthantetrd. Deze vergadersng bestaat uit de vaste aede*«p- 
ktrt zoalt in da colofon veraeid. Het aantal inzendingen is 

?roter dan in een enkele editie van ainiaaal 48 pagina's is 
e vemerken. Hierdoor kan het voorkoaen dat een inzending 
etrtt na enige tijd kan Horden gepubliceerd. 

DE CLUB HEEFT BEHDEFTE AAN MEER LEDEN. r.l UILLEN MER OflN 
KUMCN BIEDEN DAN NU AL )CT 6EVAL IS. l£RF DflAROM EEN LID' 

HILT U EEN PRIJSLIJST? STUUR EEN SffRANKEERDE ENVELOP AAN 
HET REDAKTIE-ADRES. 

Etn onaf hankel ijki jury kent jaariijks etn aantal aanaoe- 
digingspreaies toe aan auteurs van gepubliceerde artikelen 
in DE 6502 KEMCR. 
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KEMMER 



De 6502 KEMCR is een 
uitgave van de KIN gebrui- 
kin Club NMierland. 

Adres voor het inzenden 
van en reakties op artike- 
len voor DE 6502 KENNERi 
Uillet L. van Pelt 
Jacob Jordaensstraat 15 

Vaste MdeNerkers: 

Millet L. van Pelt 
Gerard van Roekel 
Frans Swehui izen 
Coen BoltjM 
Freelance ledeHerkers: 

Rob Banen 
Fred Behringer, (Genuny) 
rridus Jonktan 
6ert Klein 
Roger Lanaeveld 
Hare Lachaert, (Belgiua) 
Fernando Lopes, (Portugal) 
Frank Nanshande 
6ert van Opbroek 
Leif Rasaussen, Sweden 
Ruud Uphoff 
Frans Verberkt 
HerMn Zondag 

VkrtaalHerk: 

Fred Behringer (6er«any) 
Uillet van flsperen 
Frank Bens 
Albert v.d. Beukel 
>Me Hettfleisch 
Jaap de Hoop 
Coen Kleipool (France) 
Naarten van Lieshout 

Gehele of gedeeltelijke 
overnaae van de inhoud 
van DE 6502 KEMER zonder 
toesteuing van het be- 
st uur is verboden. Toepas- 
sing van gepubliceerde 
prograaaa's, hardtiare etc. 
is alleen toegestaan voor 
persoonlijk gebruik. 

DE 6502 KEItER verschijnt 
6 X per jaar en heeft een 
oplage van 500 exeaplaren. 

Coifyright (C) 19Bfi KIN 
SebruiRers Club NedcrlaTid. 



De voorpagina is de D0S65- 
controllerkaart. ontHilr 
keld door Ad BrouNer. 
m/Cms E. Visschedijk. 

I.v.e. auteursMetgeving 
aanvaardt de redaktie 
geen aansprakeliikheid 
voor inzendingen. lenzii 
anders aangegeven, dient 
de inzending afkoastig te 
zijn van (ie inzender. 



INH0UDSOP6AVE DE 6502 KEMR m. 45 AUGUSTUS m 



20 Scpteaber 1986 



2. 
6. 

3. 



1. Uitnodiging Landelijke BijeenkoMt 

2. Van de redaktie 

3. Elektor'f EC65i Starcatcher; Basic gate 
... Leif RaiMMiiii, SMtdw 

-4- ACORN ELECTRON: OiufMrtlflr; iMie pnqm 4. 
... Siaon J. Voortaan 

5. The NC68000 NicroptCNur; a nan proctuor in our club 7» 
i)» Birt van Opbroek 

6. Elektor'i JUNIOR coaputer itith VOU, OHIO DG6 and bank-witchingi 
NUNBERS: routines to handle the input of nuaben froe the keyboard 12. 
REAL TliiE CLOCK; routines to Stt md to dil^^ ItMl, biMd OR 146811 IC 
... Fernando Lopes, Portugal 

7. Elektor VDli-card •odifiNtiiw M» 
... J.C Rix, England 

8. Elektor' s JUNIOR or 0CT0PUS/EC65 coaputcri 

NiH CENTMMIC routine for tim JUNIOR/OCTOPUS 65 22. 
... Coen BoltjM (Trml.t Elya van itMm^ 

9. ENOUETE ender de leden van de KIN Bebruikersclub Nederland 23. 
ENOUIRV uong the aoabert of the KIN UMrt Club Tte Netharlandi 

10. JUNIOR: P08VM. 9CHARKN0NIT0R part 2 2S. 
JUNIOR: poeVAL 9CHES8NQNIT0R for Eltktor'f JUNIOR eitk hexdisplay 

... Frans Raaijaakero 

11. Letter to the editor 42. 
«<rfiii'llli*lngir, Nuenchen 

12. BASIC: CoapetitiestMdm (HandbaU part 4 43. 
. . . Gerard Keet 

13. M1N/D0S65: 

6502-Tracer for the N0N/DOS65 coaputer 46. 

Use of cursor-control-k^ ED 

... Rene Hettfleisch (Transl.i Naarten van Lieshout) 

U. Elektor' s OCTOPUS/ECfiS ef^ert 
OCTQBJSJisks. 
Mtfr MMM van Aspiren 



Froa our anbar Jup do Hoop m received inforaation about tNO noN alcro- 
processors: the 6TE 665SC802 and the 6TE 66SSC816. 16-bit aups featuring 
total softHare coapatibility Nith 8-bit NNOS and CMOS 6500 series tups. 
The G65SCS02 is pin-to-pin coapatible Mith 8-bit 6502 devices currently 
available, Mhile also providing full 16-bit internal operation. The 
G65SC816 provides 24 address lines for 16 Nbyte addressing, while provi- 
dino both fi-bit and 16-bit operation. 

Both aicroprocessors art eblJURablc by Nicrotronics, Uilgtnkade 10, 3992 
LL Houten, The Netherlani^Mine: 03403 - 91369. 
Prices for both aicroprocessors about Hfl. 75,00. 

For Apple IC and ICE : Graphics Board usable as 768 Kbyte RAN Disk. 
Coaputer Inforaations Systeae, Aa Eiseren Schlag 27, 6000 Frankfurt/Hain 50, 
Geraany, offers this porduct aentioned above. Supporting software utilities 
like zooa. copy, pattern, text, duap and filling arrays, the colour graphics 
board featurs a resolution of 512x512 pixels interlaced or 51^236 noif 
interlaced. Other features include 48 separate graphics pages Hf amitttion. 
1 Billion pixels/s writino speed, S basic colours and 2ft«lMd colours and B 
shades on aonochroae aonif ors. The board can be connKt«f to standard aoni- 
tors and it features sfpartt* JMI and TTL ottkpl. Data c«i bt inintt through 
llgM-pen, jif^etM, iotti wi diftiiztf bottd. 
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U I_T_N_0 D I G I_N G C L U B J IJ E ENKOWST 

Datum : Zaterdag 20 September 19S6 

Lekatie : Speeltuingebouw Beeklust/Ossenkoppelerhoek 

Jan Steenstraat 69, flLBELO, TEL. 05490 - 19443 
Entree : Hfl, 10, ^ j,.p. 

Reisroute per auto ! 

Vanuit het westen en het zuiden via de fl!/fl35. 

1. flan l»t einde van de snelweg rechtsaf. Bij de eerstvol- 

^fSte stoplichten rechtdoor. Ma ca. 100 «. kruispunt 

|BBder stopHchten. 5a hier linksaf. 
2' p» straat, de Jan Vermeerstraat, maaKt een flauwe 

bocht naar rechts. San het einde van deze bocht ziet U 

links de lichtnasten van een voetbalveld. Ba linksaf. 

^t speltui«gtb9uw vti«t U im ct. 150 •. am lir*tp- 

Vawttit %6t ftoorden via ce Ni3£, 

1. 3ij door tot flWB-borden richting Wierden/Zwolle. Ga 
*iier rec'itsaf. Blijf deze meg volgen, L' komt dan over 
few spoorneoovergang, 

f, '|i na ca- iSO ». linksaf, weer nc^iting yie^'den/ZwolIe. 
Na ca. 200 «. ziet U rechts een 'exaco-benzinestation, 
Sa Hier rechtsaf. Verrier als beschreven bij pant 2 van- 
uit de richting hierboven. 



PROGRflMMfl 



09.30 
10.00 
10.15 



Zaal open. 

Opening 

Forum. 

Wout van Dinther en Will Cuijpers zijn onverdroten 
als het gaat oji het beantwoorden van hardware m 



software problemen aangaande de Octopus. 
Stuur UN vragen - als het even kan - alvast 
de redaktie, dat spaart wat tijd. Bovendien kan 
later wellicht een publikatie over volgen. 
Heeft U bepaalde proalei»en al opgelost, zet ze dan 
ook even o? papier en stuur het naar de redaktie. 
Het Forun kan mr^ gavolgd door het timen 
wat nieuwtjes. 

wflRKT. Vraag en Aantiod door de aanMeziae leden. 

Lunch, 

I\'FOR*lE:. 3EDZEL';. 



naar 
er 



van 




11.45 
12.00 
12.45 



:r 15 vo.o? S9:egen'"ieid kennis te maken met a^wfere 
leden van de club e" hun systeinen, 

-■eeft L software ^lardwa^e ontwikke'd? Breng het 

fiiee en geef het af aan de redact ie. 

Wilt Ll meeooen aan vertaalwerk? 

Waakt U graag leuke il lust rat ies'' 

Kent U nensen met een 6502, 5309 of eSOOC 

Geef het op aan de redaktie. 

17.00 - Sluitiraj van de bijeenkeiwt. 



XOXOXOXOXOXOXOXOXOXOXOXOXOXOXOXOXOXOXOXDXOXOXDXOXOXOXOXOXOXOXOXOXOKOXOXO 



With this little Forth-codipiler progra« you can list a 
•ax. of 32 K in a so called Hex/flscii-dunp. 
Author! Fridus Jonktan The Netherlands. 
Systea: Elektor's JUNIOR computer with P«l and TM. 

SCR I 1 

0 ( mfmu-am > 



1 

2 
3 
4 
5 
6 
7 
I 
I 
10 
11 
12 
13 
14 
IS 



HEX 

: .ROW CR 2 SPACES ." ADRES " 10 0 DI I . SPACE LOOP CR • 
: ?NON-PRINTINS DUP 20 ( SWAP 7E ) OR • 

' fD(?n2 "0 DUP I + C§ DUP ?N0N-PRINT1nG IF DROP 2E THEN E»IIT 
LOOP DROP ; 

' !SyfP 2 PS„2"EJL* ce DUP 10 ( IF space 3o e«it i else 3 

THEN . R LOOP DROP : 
! A-LINE CR DUP 0 6 D.R SPACE 10 OVER OVER HDUMP 

2 SPACES (TYPE * 
! DUUP .Rlftl OVER - 0 DO DUP I + A-LINE 10 +L0OP DROP CR ; 



XOXOXOXOXOXOXOXOXOXOXOKOXXOXOIC OXOXOXOXOXOXOXOXOKOimilOXOXPtOli 

Vm FROM THE PflPERWARE SERVICE 



NEW NEW NEW NEW NEW NEW NEW NEW 
THE VDU CARD 

Article to assure that Elektor's VDU card works well. 
Software (6502-Mchiincode) with introduction. 
«anv aeeters of the club use this ssfttnre instiad of the 
software from Elektor's paperware. 

Authors! J.J.A. and J.A.J. Janssen, The Netherlands. 

Transl.i Wille« van Asperen. 

System ! Elektor's JUNIOR computer with VDU card. 

Publ. ! DE 6502 KEMNER 31, Apr. 1984, p. 17-26. 

Send cheque of Hfl. 19.00 to W.L. van Pelt (eurocheque 9.S0) 

Price only for Europun (C.E.P.T.) cflur^riH. 

THE SRAPHIC DISPLAY 

Article with schematic diagram to do graphical work (plot- 
ting of graphs etc.) with introduction. 
Authors! J.J.A. and J.A.J. Janssen, The Netherlands. 
Transl.i Willea van Asperen. 
System : Elektor's JUNIOR computer with VDU card. 
Publ. ! DE 6502 KENNER 36, Febr. 1985, p. 5-U. 
Send cheque of Hfl. 14.50 to W.L. van Pelt tl^mm^t,m 
Price only for European (C.E.P.T.) countriesT 

r ■ , , . 

■ • rj •■ . ■ 



SE 'Fij n jr^ keNimer 



IFIJEL 0 



SNOOPV 28 
SflRFIELD 31 
600FV III 
HICKEV HOUli i| 



>|i«STaRCflTCHER«« 
I 

I « 
I I 



DONALD DUCK 



t « 
I « 

» RD HITti 36 STARS 



ISTRRS 23 



» ♦ 
I « « 

HICKEV H(HISE HOLDS THE RECO « 

It ♦ 



t 



IPILOT! DOHRLO DUCK i 



R=238 



It FOR W=t TO h : CU^7+L0 : P=0 : F=500 
12 POKE CR,64 : DISK! "60 F32F" 

20 6QSUB 74 

21 PRINTU22,S)W". WHAT IS YOUR KANE INPUT Um 

22 POKE CR,32 : DISK! "60 F32F' 

30 FOR 3=0 TO 23 STEP 23 : FOR 1=0 TO 79 

31 POKE I+J»80+L0,139 : NEXT : NEH 

32 FOR 1=0 TO 79 STEP 79 ! FOR J=l TO 22 

33 POKE 1*J*80410,I39 s mi i NEXT 

34 GOSUB 74 : PRINTM3,0)"FUEL "F 

35 PRINT!((6l,0) "STARS "P : Y=12 
34 PRINTIt(31,23)*P!L0T; "+Nt(«)! 
37 FOR 1=0 TO 99 : GOSUB 72 : PRINTMX.Y) : NEXT 

40 IF X=0 OR X=79 OR Y=0 OR Y=23 THEN GOSUB 73 

41 POKE CU,32 : CU=X+Y»80+L0 

42 IF PEEK (CU)=42 THEN P=PM 

43 POKE CU,R i PRINTMS.O) F j 

44 faPEff (TIO-128 

45 IF Q= 3 THEN X=M : R=239 
U IF Q= 9 THEN X=X+1 : R=237 

47 IF t«ll THEN Y=Y-1 : R=236 

48 IF Q=10 THEN BOSUB 72 : GOTO 40 

49 Y'Ytl : R=238 : SOTO 40 

S9P(N)=f> ! mm IV H t PRINTl(3,IINtlI),P(II 

51 IF P(I)>=P TI€N P=P(n ! 8=1 

52 NEXT 

53 At=Nt(B)+" HOLDS THE RECORD HITH ■+ST«I(P)*" SWS * 

54 FOR 1=1 TO 60 ; GOSUB 70 ; NEXT 

55 FOR 1=1 TO 60 ; GOSUB 71 : SQSUB 70 : NEXT 
5S m M TO LEN(«f) : lOiJB 71 ; NEXT : NEXT 
60 DISK! "GO F3Er : DISK! "GO F32F " : END 

70 PRINTM70-I,12) NID*(AI,1,I) : RETURN 

71 TOUTIffO,!?) Hr8tfflt,I+i,LENfftl)) s mm 

72 X=INTi77»RND(l!+l) : Y=INT(22»RND(l)+l} t RETWIN 

73 P=0 ! PRINTfc(68,0)P : 60SUB 72 : RETfflW 

74 Pffimt23iOPi ♦ I T A 8 C ft T £ H E R » » 's KTIKH 



: PRlNT!(i68,0) P 
F=F-1 : IF F<0 THEN 50 

: GOTO 40 
: GOTO 40 
■ ©TO 40 



100 REHttltllttltltltltttttitilltltttlttttlt»«»ltltttit 

101 REHflfliltlittlltHliltttlHflfllltflllltlltttWIil 

102 REMII List Variables «l 

106 REHIt CR Cursors register adress It 

107 REM! IK......RSftltt«-d dati portadress H 

108 RENtt CU Position on screen tl 

109 REHII X,Y Koordinates for CU itt 

110 REHtt I, J..... Vanillic for loops 11 

111 REMII P Counts catched stars II 

112 REHtt F Fuel gauge It 

113 REMI R Airoplane ascii nr. It 

114 REHIt M Gasie rounds It 

115 REHII Q Keyboard data It 

116 RENti m NaM of player # 

117 REHII A* Record display string II 

118 REHtt It 
121 REM! Descriptions It 

123 REHII line 10 Initialise It 

124 REHII line 11 Start of six gaaes-loop II 

125 RENII line 12 &irsor blittk, elfar scfitn ft 

126 REHII line 20-22. . .Heading, name, cursor off II 

127 REHII line 30-37... Hake the screen-picture II 

128 RENtI line 40 Start sf ■litt lo^i^ Wten H 

129 REMII the airoplane drops out of the galaxy, tl 

130 REMII all collected stars are lost. il 

131 RENtI line 41. .....Bel. last plant, «slc. umi M 

132 REMII line 42.. ....Is it a star inc. star coun.ll 

133 REHtt line 43...,., Place new plane, dec. fuel II 
mfiSfn Itne #4.,....iit Itytoarl data (MEW ff 

135 REHtt line 45-47... Test for new directions It 

136 REHII line 48 or ju*p into "hyperspace" II 

137 RENtt lint 49 If no inkeys go diwn! tl 

138 REHIt line 50-52... Test for winner II 

139 REHIt line 53-72... "Rolls" winner-display It 

140 f^t Leif Raswssefl Parkvej 1 OK-4534 H«rve tl 

141 REHItttlltllltllllttttlllllllltlltllttttttllltttItt 

142 REHIItlltltlttltltllltlttlttllttlltlttttttttttttttt 
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1 Uh.tin 




K * * :* ********* :ic ; 


**** 




*** 


DISASSEMBLER 


*** 


REr! 


**::* 


Copied out o-f 


*** 


A .•"■i ET' cr K\ 


*** 


a HCC bulletin 


t%t 


Dvr.tn 




60REH 


% 1 1 


R e w r i t ten ta y 


*** 


7 OF: EM 


% * * 


S.J. Voortman 


*** 


80REM 


*** 


Beatrixweg 28 




9 OF: EM 


* 


3253 BB OUDDOFF 


*** 


lOOREM 


*: % * 


01378 3113 


*** 



ilOREM **tt*****************)K* 

130M0DE65*FX5,0 
140REM Printer o*-f 

luOP^'OC&rr ^■■/■i *FX202 

Ib'OREM Capital (upper case) letters 
l?0 

180VDljl4„ 33 ON EPF OF PF C-CI out ; END 
i90REM Set oaaed made 

210PRIMT''*=rinter on ?" s s ci=GET; IF d<>8'=' Gnrn Tgri.. cg-w jsa «= ?v» 

220VDU15J *FX5h 1 - - - — - 

I'SCtP.SH 'Printer an 

240VD'..J:2 w 1 ^ 1 , "''S, ''• 

250REM Skip over per tar at ion 

260¥PU2, i,:27,1.87, 1, 1 

270«E« Print Enlarged 

2aOO:RINT' "DISASSEMBLER" 

2®OP'f;;|f\ff'''-s, •• i^5Ti5» " ~ f., " • ETvi^s ' ■■• 

"^("■iM^Tii !•"' 1 1 O'T ' 1 A 

A_ n .». ^ H i( CJ . nil,'.' 

3iOREl'! Reset to normaal print §tyle 
330PE=EAT 

3400q%-? <. S ) 3 F R I NT ; F. I GHT* ( " 000 " +STR-|i''" •: S) . 4 > 3 TAB '51", 

360T=A '' OCX ) 
370PR'0Cad dress 
I'BOPFOCwri te. 

390UMT I L S >EN OF I MKEY* (5) 

400V0U1, 10;, 2, 1 . 17, :L .14: PR I NT "End"' 

4iOPEH One line Enli^rqed 

420VDU15. 3: END 

430F;EM F:eset paged mode 
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450DEFPCorsddrBss 

460P*=" " : " : AC*---" " : 0^-0 

470 IF M* (DC%) " MM*:="???" 5 DP=? (S) : PROConebyte: S=S+i 5 ENDPFGC 

4 8 0 IFT= 0 P*= "#?•:" r F R 3 C t w ob v t e : 3 =S +2 

490IFT-1 P*="S^" : FFOCtwDbyte: S=Sh-2 

S0OIFT=2 P*=";?," t RRCjCthreebyteE 3=3+3 

510IFT^=3 F*=" " : pi^^uConebyterS^S+l 

520IFT--4 P*=::" " : -■F:nronebvte: S=S+1 

530IFT=5 P*=" (S." 3 0*=" , X) " : PFQCtwobyts: S=S+2 

540IFT=6 P*=" (S;"iO*»'*-5„¥"lPROCtwobvte:3=S+2 

550IFT=7 Pt= : D*=" , X" : PROCtwobvte : S-S+2 

560IFT=1 1P*="S<" : 0*=" , Y" : PROCtwobvte: 3=S+2 

5 - ; I FT=8 P«= ■•?<» rO^» , X " : PROCthreebytes S«S+3 

580IFT=12P*="?<" : 0*=" , Y" : PROCthreebyte : 5=3+3 

590IFT=9 P*=" (S*" :□*=■•) " : PROCthr eebyt e : S=S+3 

600 I FT= 1 0P*« " m " ! PROCtwobvte : S=S+2 

61QENDPR0C 
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7S , LSR , 2 , 80 , BVC , 1 0 „ 3 1 ., EOF ,6,35. EOF: , . 3-, , L 3R . 
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,s<E4.,CRX, 1 
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1 020DATA g^FE , I NC , S , S'.FF , , 0 
1.030 

1040DEFPFCCi nputs 
1050INPUT"3tsrt address St"3T* 
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l080EN=EyAL("?-<"+EN*) ! IF EN>S4FFFF OR EN<S PRDCinouts 
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1 120RRINT; RIGHTS ( " 0 " +STRf <S> , 2) ; TAB (8) ; RISHT* ( " 0 " +STR-*''-- <S?1) ,2) ; TAB (ID: 

f "#*+*?Rf'^(s?2) ,2) ; ■ 
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tedaktioneel 

Op het toeent dat ik dit schrijf, half juli '86, zijn er 
& nieuMe leden toegetreden tot onze club, Haaronder 39 
it Holland, 14 uit Belgie, 3 uit Engeland. 2 uit Ziteden, 
: uit Oenetarken, 1 uit Ouitsland en I uit &panje. 
tn het gehele jaar 1985 schreven w in totaal 61 nieutte 
leden in. De nerving van nieuite leden - ite zijn niet zo 
rijk dat we daar geld in kunnen steken - verloopt dit jaar 
blijkbaar betcr dan in 19BS. Dat is hoopgevend. 
Een opvallend vcrschil let voorgaande jaren is dat in 1985 
Elektuur in haar coeputer-spccials onze nau noeede, en in 
1986 deed Elektor Electronics in Engeland dat nog eens 
heel dik over a^ mm hiiw mina gratis "advert iseaent". 
Met gevolg vm ittt liMi Mi brieven oa aeer infortutie 
m diverse raropiirlifliiiL aaar ook uit Israel, Iran, 
tm, India, Zul##HMile. Het gevolg van beide was 
een gwstig effekt op het nu bestaande resultaat. 
M leden van onze club betrekken hun spullen van Elek- 
liur, en wij van mm Imt MHiiwp m ook aan, oadat ee 
» Mk veel van kiMMi IMk ft«^ « onze club hebben 
een al laren bMMirii onafMtlijke band net elkaar. het 
IS gunstig veer vm teiden. 

Eenzelfde onafhankelijke band hebben ne al jaren net de 
Hobby Cojiputer Club, ite NgL m wilin Itimd op de jaar- 
lijkse hobbycoaputerbem in Dlri^, Mnr ook onze club 
?ltijd eeii.gratis.plaats krew, tewijl o.a. onze club Mk 
in haar NieuNsbrief iterd veNK»ld in de gele pagina's Mt 
Nij ook konden aankondigen tunneer onze bijemkMiten 
Nerdm gehovden. 

Enige tijd aeleden al Herd dit laatste aan mm mkmm. 
Dat MS een beslissing naarbij de HCC het niet nodig adi*- 
te ons daaroetrent te consulteren. 
Net »Nin brief van 11 luli 1986 schrijf t de HCC ens mi een 
ttitnodiging voor de KX dagen op 21 en 22 novnter 19B6. 



eerst sinds jaren vragen nij van u echter 

u zult niet Norden belast voor het 



een 



"Voor het 

bijdrage in de kosten 

'coaaerciele' tarief (red: f 900 =), doch voor een bedrag 
van f 250 = per kraaa (excl. btH).", schrijft een verder. 
Ten opzichte van vorig jaar aogen bezoekers, dus ook onze 
leden een toegangsprijs betaJm dwS^ i^ li^ 4m 
vong jaar: f 7,50. 

flfgezien van de vraag of dit soort prijsaaatregelen in Ne- 
derland niet onder de prijsHetgeving valt, het heeft bij 
■ii de vraag opgeroepen of leden van onze club zich if 
zullen vragen hoe ernstig de gevolgen zijn. 
Leden van onze club zien ons natuurlijk graag verschijnen 
op deze eanifestatie. Maar dit soort vercoaaercialisering 
in de HCC zou nel eens kunnen betekenen dat Hij dat geld 
liever aan andere dingen besteden. Het bestuur zal hieroa- 
trent, geschrokhm ittt it> m m^^m m^f^^'^^mrieip 
seling houden. - 
De HCC-dagen Haren voor ons een gelegenheid, die de begro- 
ting tocn al ernstig aanspraken, aaar het uitdragen van 
onze naaa, de presenfatie van hetgeen onze club presteert, 
dat zijn belangrijke overHegingen die de doorslag gaven. 
Er zijn altijd nog andere Hegen als He dat onverhoopt niet 
aeer aiddels de coaputerdagen in Utrecht kunnen doen. Maar 
het doet wel pijn als het niet aeer kan. H.L . van Pelt. 

Please, send your articles, prograas, etc. to the editors 
office, printed on white paper A-4 foraat, 8 LPI 
uinei/ineh), 68 lines/page aax., a new ribbon on your 

Ti?*!''', y"" y** *^ • printefj m 

ntn help you Hith typing the text. 

tens Coaplete source-listing of the Micro-Hare 
Asaenbler/Disasseabler/Editor for Elektor's Octopus/O:^ 
coapvter. Docuaentated by Marc Lachaert. Belgiua. 
Sand eheqae af Hfl. 74,50 ta y.Ly.Mt teargeheqii f%«i 
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mJt^M HlCROPROCESSORj A NEW PROCESSOR IN OMR CLUB . 

By: Gert van Opbroek 

Bateweg 68 

2481 AN Houbru^. 
Tel 81729-8636 

1. Introduction. 

As already written by Willem van Pelt in the 6582-KenDer 
nunber 41, the executive comiittee of our club wants to Sttpport 
some new processors. He has written that all processors 
beginning with a 6 are welcome in this club. Because I i 
nenber of comittee and I posses, since January 1986, a 
system I was asked to write sometninq about this ptottmF tna 
its differences with our well-known 6512. 

First of all, I want to tell why we want to support all 
processors beginning with 6. Miilem van Pelt has written tie 
6X(C))0(X-processors. That means the processors: 

1) the 6888-fnily: that means 6888 , 6889 

2) the 658e-fnily: 6582, 6518, 6SC82 

3) the 65SC882, 65SC816 

4) the 68e88-fami1y: 68888, 68888, 68818 

Questions you can ask are: why these processors, what do 
they have in comon and what makes them different irm 

other processor families? 

The above mentioned processors all have memory napped I/O. 
This means that peripherals, such as I/O chips, FDC's and 
so on, are part of the memory. Other processors, such as the 
8888 and 8886 families do have a separate I/O space and IN 
and OUT instructions. Hith memory mapped I/O, you can access 
tke {mri^cf tit imt lilt 

Another thing that these families have in canon is the fact 
that the control bus and timing of all the families is the 
same. The 68888 family forms, partly, an exception. It has a 
mode compatible with the 6888 but it also has an asynchronous 
mode. In a later section, I shall dj^ibe this difference. 
Because the timing and control bas'w Yb families are the 
same, peripherals from one family can easely be interfaced 
with processM's from the other. So a 6522 VIA can easely 
cooperate Mitk i poccssor. 

Mhen we look at the M0ftoP j|£|^fj instractim ift 
and addressing modes of fhe aWfM fairies, you Mill 
see that although there are smaller or 9i'e>t«',dj{fp0C«^i 
there are many similarities. The 6^882 and 65SCffli even 
1^ wtliti i #8I» 

In the next 1 shall i»erite lkt, 48888 processor. A review of 
the 65C82 can be fowit in If), of the 65SC816 in 121 and 131. 
In november 1985 Nico de Vries has given a small lectvce 
m this iH'ocessor on the club meeting in RijswijK. 

Mifhin this article I j^n elmpare the 68888 processor with 
the good old 6582. People wko are working with POP- 11 wd 
m cnqiuters will find tkaf cu'tain features of the 68iNW 
are co^»rable with features of those computers but because 
most members of our dub do not have knowledge of these 
minicomputers, I shall not c«pare the ^8 with these 
machines. 

Iv^y tlw liiff iilily tie lollcwifg aMAers: 



a) The 68888. This processor has all the features of a 68888 
but has an 8 bit datiitts. The wSirm IWS of this processor 
is 24 bits wide. 

b> The 68888. This is the base processor of the 68888 family. 
UmMM^ U kits mmt ml «Jt bus. 

c) The 68818. This processor has some differences in the 
exception scheme and is, because of a more efficient 



^ fit, 1 Hit>fBiwt of t iSm pmmat t*i«ii. 
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FI6i 1. ' :(.|itt,«^'«^;| 

In fig. 1, we can see that the 68888 has a full 24-bit 
address bus. llt J^onal A8 is not available so the 68888 
always addresses cells of 16 bit. It also has a 16 bit 
data bus. The signal (address strobe) indicates a 
valid memory addr«s on the address bus. The signals -UDS 
(iqm» data strobe) and -LDS (lower data strtriieJ indicates 
t^the wocessor reads or writes the upper resp. lOMir 
Attiittti. lAim both simals go down, the processor 
f racers a W\ l^it iifm»i. 



The CLK input is used by the clock. 68888 processors are , 
available im> ptacaam clocks up to The ioii 

comonly use* vii%lo» is the 8 MfeiwrsiW. • 

The -BR (bus request), -86 (bus orant) and -^CK (bus 
y«it «ni^«d|e» are tsidwf or DHA devices to become master 

# tin Vi»m Ms . 
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The signals FC8, FCl and FC2 indicate the processor status 
and type of the execution cycle oi the processop. 

When the -HALT signal is used as input, the processop will 
stop after ccnpletion of the current bus cycle, 

has stopped execution. 

The 68888 has an asynchronous bus. That neans that after m 
address is put on the address bus the processor waits until 
external harrt<are (iieriory, devices) has indicated that there 
are valid data on the data bus <read cycle) or the hardware 
has taKen the data from the data bus. This hardware indicates 
this situation by givino the -DTACK <data transfer acknoledoe) 
simal. When this signal does not cone, the processor waits 
until Sint Juttemis'. This situation can happen when we 

^""^ situation, the processop1J» ttis fttir ' 
<-BtKR) input. When this signal goes down, current bus cycle 
IS teminated. When the -HACT signal also goes down, the 
5k"! il,^^''''" ■"^'■T signal goes heigh again. 

When the -HALT signal does not 30 down, the processor 

sipals nost be sade bf external hardtiare. 

The 68888 has ? interrupt levels. These levels are coded by 
"^PLl and -IPL2 signa s. Interruot level 7 (ILP8. 
LPl and LP2 90 down iogetb^) is callOT IS^stibll' 
interrupt) . 

In a next section, I will write nore about ezceptisns, of 
which intepfupts fonis one fall. : f*;"*"" *" 

iLi have already written, peripherals of the 6588 and 
6888 family can be interfaced with a 68888. As is well 
Known, these fanilies do not support an asynchronous bus 
structure. For this reason, the 68888 suports, besides the 
asynchronous structure, also a synchronous bus structure. 
J,Vf.i"*^''f*" is fomed by the signals: E (Enable), -VPA, 
(Valid Peripheral Address) and -m (Valid Meaory Address] . 
ISSi o?'^??- " "sed as dock signal for those peripherals 
(PHI-2). This signal 15 six CLK periods low and^ fow CLK 
periods high. This means that in a 8 MHz system this sional 
has a frequency of 888 kHz. (1/18 of CLK). 
'5^ ,„l\^'^H inilicates that the synchronous node is 
chosen (VPA = 8: synchronous, VPA = I: asynchronous). 
The -WA signal indicates that there is a valid address and 
(for a write operation) valid data on the bus. This signal 
IS synchrounized with the E signal. The -DTACK is not used 
m a syncftronous operation. 

The timing is as follows: 

When synchronous operation is prefered, the system responds 
after a -AS signal with a -VPA signal. The processor ^ 
synchronizes then its signals with the E signal and oivet 
a synchronized -WA signal. This signal has to be used tt- , 
generate a chip select for the addressed iNffiiiMral. • 

3. PROGimiING MODEL. 

il! ' shall describe the register struct«re «i 

tfce ^IM processor . T ' * , 

}b fig. 2 the structure of tht re^tttrs it dran. 

As already written, the processor has a 24-bit address bus. 
To address this amount of memory, the processor has a 
32-bit program counter. From this register, the 8 most 
significant bits are ignored. All addresses can also be 
24 bit. An address is stored in a so called long word (4 
bytes) and. just lilce with the program counter, tbe 8 most 
significant bits of an address areipored. 
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As can be seen in fig. 2, the 6B88B has Id registers. The 
eight address registers are neant 'for adt^ess conpuations 
but can also be used for other purposes. Address registo's 
can only be used for word and longimrd operations, data 
registers can be used for byte, word and longwrd operations. 
Nhen we move (store) a word in a address register, the 
operant is sign extended, this means that the nost 
significant bit of the (word) operand is also stored in the 
liMst significant bits of the address register. Nhen we 
ftove a byte or tiord to a data register, the otli«'j4i^i,b» of the 
register are unaffected. This fHture can hawi,|#f nmy 
resttlis: . t ,. , 

MOUE.L mt,M '"■ 
HOUE.W «fFF,Ae 

In the above exwple, the branch will iotte«liC»^i 
the contents of register A8 = $FFFF. 
Hbin we use D8 in stead of A8, the branch will be emm^ 
bicause the contents of the register will be $88FF. 

Register A7 is the stackpointer. As you can see in fig. 2, 
the MI88 has 2 stackpointers. The processor has two 
operation nodes: User Hode and Supervisor node. In 
Supervisor node, the pruessor can execute nore instuctions. 
Each node has its own stackpointer. Hhen the processor is in 
supervisor node, there is an instruction to nove the user 
stackpointer to or fron an address register. Hhen the 
processor is in user node, you can not access the supervisor 
stack ^inter. Mhen an instruction can only be executed in 
supervisor node, the instruction is called priviledged^ There 
are seven priviledged instructions on the 68888, 

The status register has a systen byte and a user byte. The 
user byte cmtains the condition codes as can also be found 
in the <S82. There is one new condition code: X. This code 
is a cepy of the carry bit, affected only by those 
instrttctiofts which ^ t». used in^wilti p^Kisiim operatiims 
(i.e. ADD, StS, ASL,-i.irV'«' " ' 

The 68888 does not have a decinal (D-) flag. For BCD- 
operations, the 68888 has sane (extra) BCD-instructions. 

The systen byte contains an interrupt nasK (III) for the 
seven interrupt levels. All interrupts greater than 
nask value are processed. The S-flag is set when the 
processor is in supervisor state and when the T-bit (trace) 
is set, a trace mtption will take place after each 
instrttclion. 

4. ADOKMi» NODES. - 

^ instruction for the 68888 consists of an opcode and 
zero, one ore two operands. The description of thesi 
operants is the so-called effective address. The addraHiig 
node is the node of description of this operand. 

The 68888 has 13 addressing nodes. 

- Data Register Direct: The operand is a data register. 

- Address Roister Direct: The operand is an address 

register. 

- Address Register Indirect: The adih'ess register contains 

the address of the operand. 

- Address Register Indirect with Post-Increnent: This is the 

«Ht ii the Address Register Indirect node but the 
addrits in the address register is incrcMnted after the 
ellectiw address is calculatHi. For byte instructions 



the ad<^ess is increnented by 1, for word instructions 
by two and for longword instructions by four. 

-Address Register Indirect with Pre-Decrenent: This 

addressing node is the opposite of the Address Register 
Indirect node with Post Increnent. These Mxtos are 
used for stack addressing: 

NOVE D8,-(A7} ; Push D8 
mJE Di,(A7)t ; Pull Dl 

There are of course nuch nore applications for thett 
addressing nodes. For instance block nove: 

source: eou $18888 ; source address 
destin: equ $38888 ; destination admess 
endsrc: equ i2ffff ; end s(hjrce 

Start* 

NOVEA.L ieSOURCE,Ae 
NOVEA.L iBDESTIN,Al 

LOOP: 

miM (A8)4,(A1)4 
CHPA.L »eENDSRC,AB 
BLS.B LOOP 
RTS 

-Address Register Indirect with Displacenent: In this 
node, a 16-bit signed constant is added to the 
indirect address to give the address of the operand. 

-Address Register Indirect Addressing with Index: The 
contents of a address or data register is added to 
another address register. This gives the address of 
a nenory cell with a pointer. An 8 bit signed 
displacenent is added to this winter to five the 
address of the operand. 

- Absolute Addressing: This addressing node has two foms: 

Absolute Short Addressing and Absolute Long addressing. 
Mith Absolute Long addressing, we can address the 
ccnplete nenory. Hith Absolute Shwt addressing, we can 
address frm «888888 to $887FFF and 4FF8B88 to iFFFFFF. 
Hith short addressing, the ad(b'ess is a 16 bit nunber, 
with long addressing, the access is a full 24 bit 
nuriier. 

- Progran Counter with Displacenent: a signed 16 bit 

quantity is added to the progran counter to give the 
»MrKs of the operand. Hhen this node is used to 
address variables in nenory, the resulting code is 
positim independent; this neans thal^|[kJira|raa can 
run anyiAere in nenory without the ]n«^^ rtatteibTe 
it. 

- Prooraii Counter with Index: This addressing node is the 

Address Register Indirect no<te with Index with the 
prraran counter in stead of an address register. The 
cmfents of an address or data register is added to the 
progran counter to give the address of a pointer. A 
signed 8 bit quantity is added to this pointer to give 
the actress of the operand. 

- IuMdiate addrMwynis, Itt ineraod is given in the 

instruction IvTcmM. 

- Status Register Addressing: This node is used to acci^l 

<^|hi^f|ttai register of the 68III. Me can only access 
m ifi^ register with M®, OR aii Wt instructions to 
set or clear flags in the status register. This node 
can only be used in destination operands. 

Mien we ccnpare these adtft'essing nodes with the nottos of the 
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^582, ue see a lot di Terences. The does not 
have a zero paoe although the addresses $888888 to i887FFF and 
4FF8688 to IFFFFFF can be addressed with the Absolute Short 
node, sonething like a zero page node. Absolute addressing 
on the 6582 is Absolute Long addressing on the 68888 and 
iimediate addressing is the sane on both processors with 
this difference that the iS888e has 8, 16 and 32 bit 
constants. The 68888 does not have a indexed addressing 
like the Zero.X anJ Zero,Y and Absolute.X and Abso1ute,Y 
on the 6582. The 68888 supports Indirect addressing, 
Indexed, Indirect (like X-indexed, Indirect) and Prograa 
Counter with Displacenent (Relative addressing on the 6582). 
This last node is not only used in branches but also in 
several other instructions. Indirect.Y-Indexed on the 6582 
does not have a counterpart on the 68888. This neans that 
when m want to sinulate this node on a 68888 Me havf to 
do address calculations in an address register. 

5. INSTRUCTION SET. 

In general, a conputer has four types of instructions: 

1) Data novenent instructions. 

2) Instructions that combine two operands to produce a result. 

3) Instructions with one operand to produce a result. 

4) Instructions that control the program flow. 

I shall give a brief conparison of the 68888 and the 6582 



uun 



i.fltell mvenmi. 

LOA, LBX, LDY, PHA, PHP, PW, PiP, STA, SIX, SIY, TAX, TAY, 
TSX, TXA, TXS, TYA. '»'»»'»» 

The 68888 has the following instructions in this class: 

EXti Exchange the contents of two registers. 
LEA: Load an address register with an effective address 
HOVE: Hove data fron the source to the destination: 
source and destination can be address and data 
registers, status register, stack, nenory and 
peripherals. 

NOVEQ: Move a small (8 bit) signed constant to the 
destination, 

NQVEN: Hove one or nore registers to or frcn an effective 
idlNtt. (MOVEM D8-D7/A9-A5.-(A7), • • 
' ' MOVEM (A7)+,D8-D7/A«-A5) 
PEA: Push an effective address on top of the stack. 
SNAP: Swap the low and high order word in a register. 

5.2 Two operand instructions: 

In this class fall the arithnatical and logical instructions: 

6582: ADC, AND, CMP, CPX, CPY, EOR, ORA, SBC. " ' 

68888; ADD, AND. CMP, DIV (Divide signed and unsigned), EOR, 
NUL (Nultiply signtd tmi flBsifM#i fliU Sip. 

5.3 One ^iMptf iKstructions. . .i 

mii ASL, BIT, CLC, CLD, CLI, CLV, DEC, 0©t, K¥, M, INX, 
INY, LSR, ROL, ROR, SEC, SED, SEI. 

68888: ASL, ASR, BCH6 (Bit change), BCLR (Bit clear), BSET 
(Bit set), BTST (Bit test), CHK (Check a data register 
against bounds), aR, EXT (Sign extend), LSL, LSk, 



m (Negate 2's conplenent), NOT (I's ccnplenent), 
ROL, ROR, Sec (Set a byte to FF in an effective 
a^ress when condition code set), TAS (Test and set), 

S.4 Prograi control. 

6582: Bcc (Branch on condition), BKiC, KP, JSR, ir|| ii. 

6nN: See, fifec (DecrcMnt a data rtgister and branch until 
-1 in tkis register or cc is false: loop with naxinua 
count), BSR (Branch to subroutine byte and word 
displacenent), M>, JSR, RTE, RTR, (Load condition 
cows and prograi counter frm the stKK), RTS, TRAP, 

S,4 Nisctltaneoos instrvciions. 

In this class fall instructions that 1^ €ii 
one of the other classw: • 



6582: NOP. 



-ni 



68888: NOP, 

LINK, IRINK: The link instruction allocates a stack 
frame for local variables in high level 



RESET: 
SIOPi 



S.5 fimrits 



languages, the unlink instruction 
releases the stack fr»e. 
Reset all external devices, 
y ^pge fixc^tuw lasiE Md mit im m 
'nreittioR. it •■ '■- ■ 



As we all know, the 6582 has a decinal node. Mhen this mode 
is set. the antlnatic instntcMns Mork in BCD format. The 
68866 has separate instrucMi iir ND calculations: 
ABCD, NBCD, SBCD. 

For multiple precision operations, the 6582 uses the carry 
bit. Nith ADC and SBC this carry is used as carry bit. The 
68888 does not add or subtract the carry bit in an ADD or 
SUB operation. It has separate instructions ADDX, NEGX and 
SUBX instructions. These instructions use tbe oit thti 
contains a copy of the C bit in ADD, ^ aliNliK 
instructions. 

For imediate operations with snail constants, some 
instructions have a quick node, just like HO()EO. In this 
case, the instruction is shvter than with a nsraal 
iMwdiate optrand. 



a data register has to be rolled or shifted, the 
instruction can contain a constant for the nunber of bits 
the register has to be rolled or shifted, or the instruction 
contains another data registtr in which this consianViSc 
stored. In this last node, l^twl w* shift instriteHiK'.js 
a two operand instruction. ' 

6. EXCEPTIONS. 

One of the nost complicated things in the 68888 processor is 
exception processing. The 6582 has only two interrupts, one 
break instruction and a reset. The 68188 has wch fmt 
moptions. 

- A hardware reset. The SSP (supervisor stack pointer) is 
loaited fron adch^ess $888888 (vector 8), the PC from address 
$111184 (vector 1). 

- A BUSERR exctpttflR, aSid Mh« toft-Hil^Hi' i 
addressed. 



ill 
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MUrtss error: knrd and longword opH'atins on an odd 
adcb'ess result in this exception. 

Illegal instruct} on. 

Divide by zero. 

CIK instruction. This instrnctim checks the contents oi 
an address register against booiids. Errors resnlt in this 
exception. 

TIP/ «(Ci9tii». In the TRMV instruction exception occurs 
<im> memerVtm bit is set. 

TRAP instruction. In this instruction a constant 8 to IS 
is aiven. This is the index in the vector table for TRAP 
ins&Hctions. (MdCess «nil8l toHINSF). 

Privilege violation. The 68088 can work in superviiir «li> 
and in user node. In user node not all instruction^irf 
allowed. Nhen we try to execute such a priviledged 
instruction in user node, an exception occurs. 

TRACE, when the T-bit is set. 

Lint 1111 and line 1111 enulator exceptions on illegal 
iRstrwctiims with opcode Axxx and Fxxx respectively. These 
■xcfptions can be used to eaulate non-existing instructions 
in software. 

Interrupts. The 68888 has 7 vectored interrupts. With the 
I-bits in the status register, the pritrity of the processor 
is chosen. Each interrupt with higher priority is affected 
and an exception occurs. During this exception, the nask in 
the status register is set to the priority of the interrupt. 
Priority 7 can not be masked out, this is the NonHaskable 
Interrupt. The 68888 has 7 autovector interrupt vectors, 
one for each |N*iority. Mhen during the interrupt acknoledge 
the -WA tigni} goes (town, the processor takes the address 
in the corresponding vector to find the interrupt service 
routine. This nethoo is used for interrupts fron devices 
of the 65xx and 68xx series. The 68888 has also 192 user 
interrupt vectors (64 to 255). luring the interrupt 
acknoledge, the device puts the vector nunber on the data 
bos and the processor finds the address of the service 
routine in the corresponding entry in the vector table. 
During this interrupt acknoledge the address on the 
aiMress bus is iFFFFFn tdiere n is the priority i 2. Althoug 
this address is not neaiit to address ran, it can be used 
to read the vectcH* from ran on these locations. 

' Unitialized interrupt vector. This interruot occurs when 
a 6xxxx peripheral gives an interrupt and the interrupt 
vector register in the device is not loaded. 

' Spurious interrupt when during a interrupt acknoledge no 
device responds by puttino the interrupt vector on the 

9)^mt^mm^ a ^^oim lotion 
oeoifs. 

As you see, the exception capabilities ^nuch further on the 
68III than on the 65l2. You have however to pay for these 
features with a very co^licated interrupt acknoledge seouence. 
I hope, that ny description of the exception processing does 
not cenliift timificut irrflrs, I an not sure I understand the 
itterpipl mmimgft m$mt*if. 

7. mmwm mm. 

There are already a few complete systens with a 68888 on the 
narket. In this section, I shall descripe %m of these 
systflH. 



7.1 Sinclair OL. The Sinclair QL was one of the first 
ccnputers with a 68888 on the hobby narket. It contains 

a 68888 processor. As far as I knows, the conputer is not 
very popular, I think the Man reason for this is the 
fact that there is not kMy sef Ivu^e i» tbit ■acbine. 

7.2 The Apple Macintosh. This conputer is not neant for the 
siateur. It contains a 68888 processor and has a operating 
systen with so called icons. That neans that alnost 
anything is nenu driven. Mhen you want to do sonething you 
point to the associated icon with the Miil|||l!tS5 the 
button and the progran starts. 

7.3 The Artari 528 ST. I think that this conputer is the IBM 
PC for the 6888B fans. It has a 68888 processor. It 
supports very nice graphics and there is already sane 
software for it and the nwiber of prograns is growing 
each nonth. Beside these facts, the conputer is rather 
cheap. 

7.4 The CMMMiore Pniga. Also a 68888 processor, a very new 
■achile. It has nore features than the Artari but it also 
costs a lot of Mnty. 



7.5 The NC68688, ley conputer. This conputer is published by 
the oernan nagazine NC. It is a single board conputer 
Just like the Junior with a 68888 two 6522 VlA's, a 6845 
video controller and 128 or 512 kB ran. On board there 
are 8 expansion slots. Already available are a floppy 
controller, 2 MB ran board, 8 line RS232 interface and 
operating systens CFH-68K (single user) and 0S9-68K 
<nulty user). The only problen with software for this 
cinpottr is tht |N>ice. 

7.6 The c't 68888. Just like the MC6888e is this a project 
of a geman Mf^int: C'T. I do not know any details of 

7.7 The EC<8e88. A new project of Elektuur with a 6888B and 
a ^19 intergrated in one conputer. It is published in 
Elektiar ^f^^ ^mM 3. 

7.8 All kinds of l^-bus nachines with operating systems 
UNIX, 0S9-68K. VERSADOS PDDS etc. These machines are 
neani for professional applications and are rather 
expensive. These conputers are beconing industrial 
standard lor c«Mi|i^ |iPOE«fifs* 

7.9 based conputers with UNIX-V operating systen like 
iff Integral and AT&T UNIX PC. These conputers are the 
6MN \wrsims of the UN Ml. 

7.18 In the near future, all kinds of upgraM bo«H|s iTitb 
68888 can be bought for the Apple II and IBt 1%. 

8. Literature. 

1) Neman ^rgers: 6312 kenner 31, april 

2) Byte August 1984 

3) Byte Septenber 1984 

There are nany books for the 68888. Each nonth there are 
issued new ones. I can not give a review of books, the best 
thing to do is, go to your local book shop and look for a 
good book. Elektuur has also issued two books on the ^11, 
and NC has issued a special on the NC6m8. 
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NUMBER 



00010 
B0020 
00030 
00043 
00050 

000 

30070 
00080 
30098 
00103 
001 10 
00123 
00130 
E0140 
00150 
03160 
00170 
00180 
00190 
00200 
BB210 
00220 
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08240 
00253 
00260 
00270 
832R0 
Ba2^'0 
00300 
00310 
03320 

rTi fS T 7 (? 

iLJ ■_' KJ 

00340 

00350 

00360 

00370 

30380 

80390 

00400 

004 10 

00420 

00430 

00440 

00453 

00460 

00470 

30480 

00490 

00500 

00510 

00520 

00530 

00540 

00550 

00560 

00570 

03530 

00590 

30603 

00610 

00620 

00630 

30640 

00650 

30660 

00670 

03680 

00690 

00700 

00710 

00720 

00730 

08740 

00750 

00760 

00770 

00780 



12 



Al 29 
7A Fl 
5D F3 
FE F4 
06 F5 
09 F5 
75 F5 
7E F5 
lA F6 
IB FE 



3800 A0 03 
0802 2C 

D803 H0 01 

D805 A? FF 

0se? Pi §4 



* ■ ' #i 
» N U B 1 E t S « 

* # 



Routines ta hswdl* the input o-f numbers ^roiit the key- 
board and to c0Bvert them between Decimal and Hexade- 
cimal notations. 







mmik mm 






D8 


00 


DECFLG * 




#8ci»al flasi ta»dfc, FF=hi«p|«€liaa 


ED 
EE 

EF 


00 
00 

00 


ONE # 
Ti^O ♦ 
TRE * 


teeEi 

ONE 

am 


km^§r-m ^m^km t*tfitit n«9ft#^'' 

■»-«2 


Fa 

m 


00 
00 


INL ♦ 
INN » 


illi 
ItL 


♦|B (00F8) MiMr fif i«t«i&elfciS ^-figit 

tesiporary for digit ' ' '' ' 
nuaber of digits 


FC 
F£ 


00 
00 


TEMP # 
NIBBLE. », . 


fiBFC 
taUFE 


54 


EF 


DUPLEX * 


$EF54 








*** CLOCK ADDRESSES 


*## "'i ' " 

■•• r- .1. ■ - 


C8 
C9 


EF.. 


£L«Mg ;# .. . 


*£FGi 


. .V ■■■ 1.'; ■ -1 {'.'<•■ i,! : 
> ' ' K ■ ' ' ' •. «... ,i! : 



D809 A0 04 
D80B A9 00 



#*#"|iTifNAL SUBROUTINES *** 



! . .. 



PRINf? »^ 
BELL # 
NPRCHA # 
CRLF « 
PRBS ♦ 
PRSP #• 
PRSYT t 
PRNIBL # 
A3HETT * 
SECGHft # 



f2fftl 
fFi7A 
*F35D 
*F4F£ 
IFSt6 
ikF509 
ir575 
*F57E 
tF61A 
*FE1B 



print a string on the VDU' 
ring the bell 
print a character 
print a CR and a LF 
print a backspace ■'" ■ 
print a space 
print a byte 
print a nibble 

ASCII-heKadecimal conversion 
receivp J- ■e.fe«r#c^er from km^kmf'i 



■I I. 



r" 1;- 



*#» ■immm m mm nmrnnnup' rff.l iisiT) to inh,inl **# 

Duplex flag must be cleared (00) 

Input ends with a space, or 

A space will be printed after the 4tb digit 



RECHEX LDYIM $03 up to 
$2C (BIT) 



4 digits 

jump next two bytes 



■tifitlT LDYIM $01 2 digits 

LBftIM *FF hexadeciBllf;' 
B«E RECDIS always 



.-'J 



*** RECEIVE A DECIMAL NUKlfi (TO | flilTl TO TRE, TWO, ONE 

Duplex flag aust be cleared 
Input ends with a space, or 
A space will be printed after the 5th digit 



RECDEC LDYIH $04 
LDAIM $00 



up to 5 digits 
deci ffial ! 



5 a 5 



NUffiER 

00790: 
00800: 
00810: 
00S20: 



00840: 
00850: 
00860: 
00870: 
a0880: 



00900: 
00910: 
00920: 
00930: 
00940: 
00950: 
00960: 
00970: 
00960: 
00990; 
01000: 
01010: 
01020: 
01030: 
01040: 
01050: 
01060: 
01370: 
01080: 
01090: 
01100: 
01110: 
01120: 
31130: 
01140: 
31150: 
01 160: 
01170: 
01 180: 
01190: 
01200: 
01210: 
01220: 
01230: 
01240: 
01250: 
01260: 
01270: 
01280: 
01290: 
01300: 
01310: 
01320: 
01330: 
01340: 
01350: 
01360: 
01370: 
01380: 
01390: 
01400: 
01410: 
01420: 
01430: 
01440: 
01450: 
01460: 
01470: 
01480: 
01490: 
01500: 
01510: 
015 
01530: 
01540: 
81550: 
01560: 
01570: 
01580: 
01590: 



im atl^Iii PR0H0TIN8 SY (WieJS 21 s 56: 35 
*«# fiBceive a ^ifit *## 



T«i-l7/3UN/86 PA6E 02 



D60D 85 D8 

D80F 84 FE 

D811 8h 

DS12 48 

D813 20 IB FE 

D816 C9 20 

D818 F0 4D 



D81A C9 
D81C D0 



03 



DBIE C4 FE 
D820 B0 13 
D822 C8 
D823 20 06 F5 
D626 S0 EB 

D828 20 lA F6 

D32B B0 03 

D82D 24 D8 

'D82F 70 09 

0031 C9 0A 

D833 90 05 

D835 20 20 D9 
D838 B0 D9 

D83A 48 
D83B 20 7E F5 
68 

85 FC 



4h 



D83E 
D83F 
D841 
D842 
DS43 08 
D344 24 D8 
D846 50 03 
DS48 18 
D849 69 0B 

D84B AA 
D84C B5 ED 
D84E 23 
D84F 90 0B 



D851 
0053 
DS55 
D857 
D859 
D85B 

D85C 
D85E 
D860 
D862 
D863 
DS65 

D867 
D868 
D869 
D86A 
D86B 



29 0F 
06 FC 
06 FC 
06 FC 
06 FC 
2C 

29 F0 
05 FC 
95 ED 
80 

10 AE 

30 18 

CO 
98 
0A 
0A 
A8 



0: D86C 24 08 



D86E 70 08 
0870 46 EF 
D872 66 EE 
D874 66 ED 
0876 50 04 



Error-free numeric input routine: 

- check for a diQit, decimal or hexadecinal 

- do not accept any other character except 

- a SPACE to finish input 

- or a BACKSPACE to correct a previous: 

- check for a "correction" on a digit' 'tiat i3Be«if't mi%'i. 
" "beef" the B&LL m effor. ' 



III a A 1 1 u III u c I u ( u i 

save X register 



receive one digit 

3P to finish 

If it was a Space. 

BS to correct 

ifnotaB Space. 

are we at the beginning:' 

if so, no backspace:' ( a 1 1 e ni p t to correct behind 

the 1st digit) 
correct the previOLis digit; V = 8 
always. Receive a new digit 

ASCII to he;;adecifflai GOnversion 

i f < 0 or >F 

if he ;■; a d e c i iri a 1 

if decimal 0 to 9 

: error, ring the bell & save Y ; 
always 

save nibble 

print it (DUPLEX is offi 
restore it 



RECDIS 


STAZ 


DECFLG 




STYZ 


NIBBLE 




T X A 
PHA 




RECDI 


JSR 


RECCHA 




CMPIM 






BEQ 


SPCEND 




CMPIM 


$08 




BNE 


R E C D 




CPYZ 


NIBBLE 




BCS 


RECBEL 




I NY 






JSR 


PRB3 




BVC 


RE CD I 


RE CD 


JSR 


A S H E T T 




BCS 


RECBEL 




BITZ 


DECFLG 




B'v'S 


RECVAL 




CMPIM 


$eA 




B C C 


RECVAL 


RECBEL 


JSR 


BELLY 




BGS 


RECDI 


RECVAL 


PHA 






JSR 


PRNIBL 




PLA 






STAZ 


TEMP 




TYA 






LSRA 






PHP 






BITZ 


DECFL6 




BVC 


RECTAX 




CLC 






ADCIM 


f 0B 


RECTAX 


TAX 






LDAZX 


ONE 




PLP 






BCC 


RCEVEN 


RECODD 


ANDIM 


|0F^ 




ASL Z 
ASLZ 


T E M p 
TEMP 




A S L Z 


TEMP 




ASLZ 


TEMP 






*2C 


RCEVEN 


ANDIM 


$F0 




ORAZ 


TEMP 




STAZX 


ONE 




DEY 






BPL 


RECDI 




BMI 


RECEND 


SPCEND 


I NY 






TYA 






ASLft 






ASLA 






TAY 




RECROR 


BITZ 


DECFLG 


RECBVS 


BVS 


RECINH 




LSRZ 


TRE 




RORZ 


TWO 




RORZ 


ONE 




BVC 


RECDEY 



:=i 



get digit count 
divide by 2 : c a r r y = 
save carry status 
whicn input buffer' 
if decimal. 



if odd; =0 if even 



(INL=ONE+aSJ compute hexadeci mai -fciilf fointer 

get byte-posi ti on (pointer) 
get byte from buffer 
restore carry stattts (eveitt/efldJ 
if even. 

mask old digit. Y = 3 or i (odd) '• 
positiftn correctly the new digit in TEMP 



(BIT) jump next 2 bytes of frcsfrSi Citt- 

mask old digit. Y=2 or 0 (even) 

inciLide the' new one 

save it (byte) 

a 1 i d 1 q 1 1 5 ? 

no; r e c e 1 v e m o r e = 

always. YES; stop. 



number of digits (nibbles) missing, 
multiply by 4; compute number of bits, 

bit count on Y register 



if hexadecimal. 

rotate nibble (digits! through 
fill missing digits with zeros 

always 



buffer 



13 



s?Ei 5 O !□! 



KEIMMER 



NUMBER THE JUNIOR PRMOTINB CY (MSJ) tisi7{|f - tOt l7/jilf/Si MiE tl 



D878 46 F9 
D87A 66 F8 

D87C 88 
D87D Da EF 

D87F 68 
0880 AA 
DSn 4C 09 FS 



RECINH LSRZ 
RORZ 

RECDEY DEY 
BNE 

RECEND PLA 
TAX 
JHP 



INH 
INL 



RECiVS 



PRSP 



idea for decimal 

all bits ftoved? 

restare I register 

fjritit a i]Pae« and RTS; V=0 



»** DiCIIIttlL - MEMiiCiftAt CONVERSION *## 
# #*#****# ♦ # # # ♦ # ##«« 

Subtract PQWERS from the nuisber 
yfltil a resalt negatiwe* 





D 6 8 4 








DECHEX 


TXA 






T^, o cj n 










PHA 




01S00: 


D336 


98 








TYA 




i3 1 S i 0 : 


D3B7 


48 








PHA 




ilU o i. iu ; 




F 3 








f-« r— n 

StO 




B 1 e j 12 : 


r, c C O 

Job 7 


H0 










Wf 


B 1 a4H ; 


n o o D 


m 




OS 




JSR 


fyi 


i O ^ • 

a 1 o ie : 


L' d b t 


0H 








hSLA 




ii .1 a tr ij ; 


DS S F 


0H 








HsLA 




'Tt ^ Cj 7 (Tj . 


L' d 7 (fl 


0h 








AStA 




:S i Li C o 

iu 1 d u B : 


n D o 1 

tic V I 










ASLh 




rS 1 D D iyl « 




i. 0 


A r, 


bo 






STOSUB 




v\ o o ^ 
U a 7 J 


- 


r~ CD 
r 7 






ORAZ 


INH 


ii3 i 7 i a : 


r. O :~ "I 

U iD 7 / 


■~ Hi 
i0 


AD 


08 




JSR 


STOSUB 


e 1 7 i a ; 


L' C 7 hi 










A r* 1 A 

ASLA 






r. Ci r? D 
L' b 7 u 


0H 








ASLA 




B 1 Y 4 H ; 


n c C P 


0h 








A 1 A 

ASLA 




16 1 7 J 13 : 


n D c r\ 
U tj ; L' 


ISh 








ASLA 




t) i 7 oiii : 


Ti O O C 

L' b / c 


~; c: 


^ b 






A 7 

STAZ 


INL 


'7 1 O 7 fS . 


D 8 A 0 


i0 








JSR 


SUB 


irt i w O 1^ fe 

B 1 Y a la ; 


n 0 A 

ly b H • J 




r b 






no A 7 


T fcl ! 


U 1 7 7 ifl : 

Hi ntni n . 


D3h5 


d J 


ro 






1? Y A *T 

STAZ 


INL 


0^000 : 

41! i 0 1 0 : 


L' 3 A / 


68 






DECEND 


PLA 




iTi n fs ^ ni , 

a i- B i c ; 


n G .'\ "i 
U D H Q 


AS 








TAW 

TAY 




02030; 


n A n 


6 3 








PL A 




a B d (71 . 

tJ i- iu 7 16 ■ 


L' u H H 


H A 








Tfi* 
1 Hfl 




02050: 


08 AS 


D8 








CLB 




02060: 
02070: 


D8AC 


60 








RTS 




02030: 


ij a H D 


05 


pq 




STOSUB 


STAZ 


INH 


02090: 


DSAF 


A 2 


00 




SUB 


LfiXIH 


$m 


02100: 


D8dl 


33 






SUSS 


ftC" 




021 10: 


D8B2 


A 5 


ED 






LDAZ 


ONE 


02120: 


D8B4 


F9 


18 


D9 




SBC AY 


POWERS 


02130: 


DBB7 


85 


ED 






STAZ 


ONE 


02140: 


D8B9 


A5 


EE 






LDAZ 


TWO 


02150: 


D8BB 


F 9 


19 


D9 




3BCAY 


POWERS 


02163; 


D8BE 


90 


05 






BCC 


SUBD 


02170: 


D8C0 


85 


EE 




SUBST 


STAZ 


TWO 


02180: 


QeC2 


E8 








I NX 




02190: 


D8C3 


D0 


EC 






BNE 


sues 


02200; 


DeC5 


C6 






SUBD 


DECZ 


TRE 


02210: 


D8C7 


10 


F7 






BPL 


SUBST 


82220; 


DaC9 


E6 


pp 






INCZ 


TRE 


02230: 


D 8 C B 


A 5 


ED 






LMZ 


ONE 


02240: 


D8CD 


79 


IS 


09 




A0SAY 


POUERS 


02250: 


Q6D0 


85 


ED 






STAZ 


ONE 


02260: 


BSD 2 


BA 








TXA 




02270: 
















02230: 


B8D3 


C8 








I NY ■ 




02290: 


D8D4 


C8 








IK¥ 




02300: 


D8B5 


60 








RTS 





powers count 



(STAZ INH I 
(STAZ INH ...) 



restare registers 



I * subtract isB tia«s cBUBt 
subtract pxmer iron wttlBf 



zero? 

if nuaber 

add power 



get count 



sti 1 1 posi ti ve. : 
again, if negatite. 



increfltent POWERS pointer 



##* HEXAOECIflAL - DECIMAL CflltVSRSION *«* 

Add: powers Ifeexa) times up to a total decimal number 



14 



EfEi 15 D i5 



NUMBER 

02380: 
02390: 
02400: 

mm-. 

02430: 
02440: 
02450: 
02460: 
02470: 
02480: 
02490: 
02500: 
02510: 
02521: 
02530: 
02540: 
02550: 
02560: 
02578: 
025t0J 
02590: 



THE JUNIOR PROMOTING CY ikiUi lllWlil im l?/Jti«/16 Pi« f 4 



02610: 
02620: 
02630: 
02640: 
02650: 
02660: 
02670; 
»2bm: 
02690: 
02700: 
02710: 
02720: 
02738: 
02740: 
02750: 
02760! 
02770: 
02780: 
02790: 
02800: 
02810: 
02820: 
02B30: 
02840: 
12850,: 
02861: 
02870: 
62880: 
32890: 
02900: 
02910: 
02920: 
02950: 
22940: 
02950: 
02960: 
02970: 
02980: 
02990: 
03000: 
03010: 
03020: 
03030: 
03040: 
03050: 
03060: 
03070: 
03080: 
03090: 
03100: 
03110: 
03120: 
03130: 
03140: 
03150: 
03160: 
03170! 



wm h n 

D8D7 48 
DSD8 8A 
BiPf *8 

ifift Fi 

D8DB li 2f D9 
D8DE At t@ 
D8E0 A5 F9 
D8E2 F0 03 
iSi4 28 F2 B8 

D8E7 A0 04 
D8E9 A5 F8 
D8EB F0 Bi 
D8ED 20 Ft Of 
liFB if iS 

D8F2 48 
D8F3 4A 

iif 4 m 

B8F6 4A 

D8F7 20 FD D8 

D8FA m 

D3FB If W 

D3FD AA 
&8FE F8 D3 



fU 
PHA 
SED 

jp Q-IBM mS. TM-im (dsclfflal buffer) 

Luim tit V = powers pointer 

LDAZ INH get high byte 

BEQ HEXLDY if zero. 

JSR DECABD add pQ(»er to nwfcer 



HEXLDY LDYIM $04 
LDAZ INL 
BEQ 
JSR 
iHE 

DECADD PHA 
LSRA 
LSRA 
LSRA 
LSR« 

J S t mmB 

PLA 

AMBI W 'i»F 



get loM byte 
DECEND if zero. 
DECADD 

ItCEHiB . almya k RTS 



get ftlfh byte 



DEC AD TAX nibble to 

BEG SUBRTN if zero. 



fst low nibble 
X 



Q?8a 


le 






DECC CiG 


OWE 


processor's decifflai tiag is set! 


DfBl 


AS 


ED 




lBai 


D903 


79 


18 


D9 


ADCAY 


POWERS 




D906 


85 


ED 




STAZ 


ONE 




D903 


A5 


EE 




LDAZ 


TWO 




D90A 


79 


19 


D9 


ADCAY 


POWERS 


+81 


D9iD 


as 


EE 




STAZ 


TWO 




n9ftF 

u 7 w r 


7 w 






BCC 


DECX 




D911 


£6 


EF 




INCZ 


TRE 


it does nat matter the Deciiftai flag, 1 














max 1 mum is 07 . . . 


HQ 1 

L/ 7 i -J 








DECK 0EX 






D914 


08 


EA 






&ECC 




D916 


F8 


BB 




in 


SUBRTN 


always «s RTS 










####«#«##*##»#####♦#*##*«**##«#**#*##«#*##*#*#«#*#*#### 


D918 


n 






POWERS = 


$96 


4896, 256, 16, 1 


D?i9 


40 








$40 


D91A 


56 








$56 




S91B 


02 






'* 


$82 




09 1 C 


16 








$16 




D?tD 


00 






m 


$80 




D91E 


01 








$01 




D91F 


00 








$88 




D920 


98 






BELLY T¥« 




save Y 


D921 


48 






PHA 






D922 


2$ 


7A 


FI 


JSR 


BELL 


ring the bell 


D92,5 


m 






Pii 




Df2S 


m 






- Iflf' 




restBTB Y 


D927 


38 






5tS 
ftTS 




set carry for later branches (-aluays 


D928 


60 








D929 


A9 


00 




CLEAR LDAIM 


$08 


Clear decisai buffer 


D92B 


85 


ES 




STAZ 


ONE 




D92D 


85 


EE 




STAZ 


TWO 




D92F 


85 


EF 




STAZ 


TRE 




D931 


60 






RTS 














##**#**#### 


test ti 


D verify NUMBER routines **#****##*§ 


0932 


20 


09 


D8 


dee HEX JSR 


RECDEC 


receive decimal 


D935 


20 


84 


Dt 


JSR 


DECHEX 


convert to hexadeciiBal 



15 



Keivimer 



SWtER T»i JWflM WOWTIM Cr ilOcJI 22:80:17 - TUE i7/JUN/86 PAGE HI 



16 



D V3S 


ft-S 


Ff 




LDAZ 


INH 


D 9 3 A 


20 


75 


FS 




PRBYT 


P. n rv 

D 9 D 


h5 


FB 






IHL 


D 9 3 F 


20 


75 


F5 


lift 


PRBVT 


D94 2 


23 


FE 


F4 




ERLF 


D94 J 


50 


EB 






#t«HEX 


D947 


20 


00 


08 


hexMC JSR 


f?ECHEX 


r\ w /i 
U V 4 h 




Do 


Do 


jSR 


HEXDEC 


D94D 


A5 


EF 




LDAZ 


TRE 


D94F 


20 


7E 


F5 


JSB 


PRNIBL 


n c cT o 


A 5 


EE 




imi 


im 


D954 


20 


75 


F5 


3it 


PRBYT 


09=^7 


.■^ IT 


ED 




IDAZ 


ONE 


D959 


20 


75 


F5 


JSR 


PRBYT 


D95C 


2e 


FE 


F4 


JSR 


CRLF 


DfSF 


50 


E6 




BVC 


hexDEC 



D961 
D964 
D965 
D966 
D967 
0966 
D969 
D96A 
D96i 
D96C 
D96D 
D96E 
D96F 
D970 
D971 
D972 
D973 
D974 
D975 
D976 
D977 
D97B 
D979 
D97ft 
D97B 
D97C 
D97D 
D97E 
D97F 
D980 
D9S1 
D982 
D983 
D984 
D985 
D986 
D987 
D988 
D989 
D98A 
D98B 
D98C 



print. the 4-nibble number 

carriage returtt 

receive hexadecimal 
convert to decimal 

prittt the 5-digit number 



carriage return 

loop: receive new number- 



#############«#*###**#########*##*♦##«#«*##*#*###*#»### 

* * 
» REALTIMECLfCK * 

# # 



Routines to set and to display time. 
Based on the 146818 Real Time Clock IC. 
elektor electronics - April 1985. 

Format chosen for output: 
09:20:59 - SAT 22/FEV/86 
(hoar :«inutes: seconds " day at the week 
day of fflonth/fflonth/yeitF I 



20 A 1 29 
0D 

4F 
50 
54 
49 
4F 
4E 
53 
SA 
0D 
0A 
53 
29 
45 
54 
20 
43 
4C 
4F 
43 
4B 
0D 
0A 
44 
29 
49 
53 
50 
4C 
41 
59 
20 
54 
49 
4D 
45 
0D 
SA 
BE 



RTCLCK JSR 



PR I N'T V 
$0D 
$M 
'0 
'P 
•T 
'I 
0 



f0D 

im 

') 

;t 
•c 

'L 
'0 
'C 
'K 
$00 
I0A 
'D 
' } 
I 

*S 

'P 
'L 
'A 

;y 

'1 
'1 
•n 

'E 

$m 





be 


0 


0 


0 


0 


0 


0 


0 


0 


0 


0 


0 


0 


1 


I 


1 


1 


** 


0 


0 


1 


1 


0 


0 


1 


1 


faS 


0 


1 


0 


1 


0 


1 


0 


] 


b4 


b3 


b2 


b! 




0 


t 


2 




4 


5 


6 


7 


0 


0 


0 


0 


0 


NUL I 


^: 






„ * 
® 64 




. 60 
96 


» 
P 112 


0 


0 


0 


1 


1 


SOH 1 


DC. 


' I 


1 1 




Q ^; 


61 


71 

" iia 


0 


0 


1 


0 


2 


srx I 




u 22 
34 


^ 50 


B I 


n ^ 

" 82 




3S 
IH 


0 


0 


I 


1 


3 


CTX J 


DC3 1, 


23 

* 35 


3 ^ 


c t 


s 

^ 83 


fa 

_^_99 


73 

^ lis 


0 


1 


0 


0 


4 


EOT I 






^ 52 


° : 


' 84 


° ICC 




0 


1 


0 


1 


5 


ENO = 


NAK J, 




^ 53 


E * 

69 


" 85 


65 
^ 101 


75 
" 117 


0 
0 


1 
1 


1 
1 


0 

I 


6 
7 


ACK ° 
BEL ] 




& 38 
. 27 
39 


S 54 

7 

' 55 


F * 

70 


' 86 


f 

102 


76 
" 118 


™'i 


S 71 


W " 
87 


67 

■3 103 


77 

" 119 


1 


0 


0 


0 


e 




CAN 24 


' 40 


8 56 


" 72 


88 


" 104 


78 
" ISO 


1 


0 


0 


1 


9 


HT I 




' 41 


9 

^ 57 


^ 73 


' 89 


. 69 
^ 105 


79 
y 121 


1 


0 


I 


0 


A 


LF * 


sub'* 


42 


3A 
■ 58 


4A 
^ 74 


z 

'■ 90 


6A 
1 106 


7A 
^ 122 


1 


0 


1 


1 


B 


VT ' 
" 11 




+ 43 


3B 
' 59 




' 91 


' 107 


' 123 


1 


1 


0 


0 


C 


FF ° 

" 12 




2C 
' 44 


3C 
< 60 


L 

^ 76 


5C 
\ 92 


1 

' 108 


1 124 


1 


1 


0 


] 


D 


CRi^ 




2D 
45 


3D 
~ 61 




' 93 


6D 
109 


1 

m 


I 


1 


1 


0 


E 


so ,^ 




2E 
• 46 


3E 

62 


N S 


* 5E 

94 


6E 

" 110 


7i 
~ 1» 


1 


1 


1 


I 


F 


SI 




' 47 


' 63 




5F 

— 95 


6F 
° 111 


TP 



NUWBEt Tit liiiW PRttitoflii ey (WSeJ) 22:81s26 - TUE 17/JUN/S6 PftSf U 



04100: 
04110: 
04120: 
04130: 
04140: 
04150: 
04160: 
04170: 
04180: 
04190: 
04200: 
04210: 
04220: 
04230: 
04240: 
04250: 
04260: 
04270: 
04280: 
04290: 
04300: 
04310: 
04320: 
04330: 
34340: 
04350.; 
t#368s 
04370: 
04390: 



D98D n IB ri 

D990 C9 44 
D992 D0 06 
D994 20 FE F4 

Off IT m m ift 



D99A A2 00 
V'iiL 8E 54 EF 
D99F A0 00 



04410: 
04420! 
04430: 
04440: 
04 450! 
04440! 
04470: 
04480: 
04490: 
04500: 

§4520! 
04530: 
04540: 
04558: 
04560! 
04570: 
04580: 
04590: 
04680: 
04610: 
04620! 
04630! 
04640: 
046 50 J 
04660: 
t467ft 
04680! 
04690: 
04700: 
14710! 
§4720!. 
847lti 



D9h1 
D9A4 
D9A6 
D9h9 
D9AA 

D9AC 
D9AE 
D9B1 
D9B2 
D9B3 

D9B4 
D9B6 
D9B9 
D9BB 
D9BE 
D9C0 

mm 

D9C7 
D9Cft 
D9CD 
D9CE 
D9CF 
D9D0 
D9D2 



B9 E0 DA 

30 06 

20 5D 

C8 



F3 



20 
C8 
90 
48 



7F 

5D F3 



A0 01 
20 0B D8 
A5 ED 
DD 88 DA 
F0 07 
90 05 
2B ?A Ft 

m. E D 



20 FE F4 



68 

A8. 
E8 

C0 45 
90 CD 



D9D1 ft2 0ft 
D9De 8E C8 EF 
D9DB 8D C9 EF 



04750! 
04760! 
14771* 
miMt 
04790! 
04800: 
04810: 
04820: 
04830: 
04840: 
04850: 
04860: 
04870! 
04880: 
04i90: 
049811! 



D9DE 
D9EB 
D9E1 
&9€4 

D9E7 
D9E9 
D9EC 
D9EF 
D9F2 
D9F5 
Wf& 
VWM 

D9FA 
D9FC 
C9FE 

met 

DA04 
DA06 
DA09 



A9 m 

il Ei £F 
10 Cf EF 

A0 00 
B9 96 DA 
BE 8F DA 
8E C8 EF 
8D C9 EF 
C8 

C0 07 
f i EF 

A2 0B 
A9 03 
BE Ca EF 
IS C9 IF 

A2 0D 
8E C8 EF 
AD 09 EF 



DA0C If FF 

DA0E 20 54 DA 
DAll 20 49 DA 
DA14 20 49 DA 
DA17 20 75 FS 
DAIA 20 09 FS 
DAID A9 2D 
DAIF 20 5B F3 
DA22 A9 20 



JSR RECCHA' 
CMP in 'D 
BNE CLOCK 
JSR CRLF 

JttP PRTDAT display iili 



CLOCK 



LDXIH 

STX 

LDYIM 



ASKFOR LDAAY 
BMI 

JSR 
I NY 
BNE 



WAIT 



RECEI' 



SA¥£ 



ANDIH 
JSR 

I NY 

T V (2; 

PH A 

L D Y I H 

JSR 

LDAZ 

CHPAX 

BE8 

BCC 

JSR 

tc?. 

STAAK 

JSR 

PL A 

TAV 

INX 

EP.yiH 

set 



f00 ##* INPUT TIME ililft DATE *** 

DUPLEX =* = = a saiSS»«*« S;*te«ai«a as « = a s SS' 
t00 

TEXT 
WAIT 

NPRCHA print te;<t (proispt) for input 

ASKFOR always 

I7F 

NPRCHA print l«st cfcaracter 



save pointer 

+02 input a i-wfrer (i-,wc±«a|l 
get it^ 
is it. mrrsttT 

error 



RECDEi 
ONE 

HAX 

SAVE 
SAVE 
SILL 

tECilV always; fteiivt again 

SATA save inputed data for clock 
CRLF 



restore index 



$45 

ASKFOR 



SETCLK IDAlt tM 

LDXIH mm 

STX CLKASR 
STA CLKiAt 

LDAIW t«5 
INX 

STX CLmm 

SfA CLilAT 

LDYIM $00 
immf LDAAY DATA 

LBXAY A8JRES 
Stt CLKAiR 
STA CLKDAT 
INY 



00..0#.itf0: clmk mAB sni SS^ «slti»i% 'i, . 
Ris^S A ■ ' ' 

$rmmQi fe|^/€aiendar updates 

iti«.00'M QQing to l«itii.llr« kipn'l MM 
iiS Reg : all iuterrti|fts are 

iCD digits; 2* ho«r/dayj 

dayll|pt saviflff* enabled 



get data for clack 

get dgstipattiiPt register 

sMrem rsiister 

write its set tiae and fate 



lYlJfr *11 ^ ctes«i5 registers? 

trC tAKOAT if 'm 



LDXIM f0B 
LDAIM *03 
STX CLKADR 
StA CLKMT 

LDXIM $0D 
STX CLKADR 
LDA CLKDAT 



PRTMt LDYia tFF 



JSR 

JSR 

JSR 

JSR 

JSR 

LDAIM 

JSR 

LDAIi 



1 
I 

PRBYT 
PRSP 

NPRCHA 



Reg B 

tiHii is already initialised. 
Reg 0 

read ref i to validate RAM and tisse 

##» PRINT TIME AND DATE *«# 

get hour ISsissSa - SAT 22/;FiB/J 

print hour; get aiftutes 
print minutes; get seconds 
print seconds 



EIE 5 □ S 



KENMI 



18 



NUMBER 

34910 
04920 
04930 
04940 
04950 
04960 
04970 
04980 
04990 
05000 
05010 
05020 
05030 
05040 
05050 
05060 
05070 
35080 
05090 
05100 
05110 
05120 
05130 
05140 
05150 
05160 
05170 
05180 
05190 
05200 
052113 

B5238 

05248 

05250 

05260 

05270 

05280 

05290 

05 300 

05310 

05320 

05330 

05340 

05350 

05360 

05370 

05380! 

05390! 

05400: 

05410: 

05420: 

05430: 

05440: 

05450: 

05460: 

05470: 

05480: 

05490: 

05500: 

05510: 

05520: 

05530: 

05540: 

05550: 

05560: 

05570: 

05580: 

05590: 

05600: 

05610: 

05620: 

05630: 

05640: 

05650: 

05660: 

05670: 

05680: 

0569.0: 

05700: 

05710: 

05720: 
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UHZ4 

DA27 
DA2A 
Dh2C 
DA2F 
DA32 
DA35 
DA38 
DA3B 
DA3E 
DA4 1 
DA43 



20 51 DA 
20 71 DA 
A9 20 
20 51 DA 
20 75 F5 
20 4F OA 
20 69 DA 
20 4F DA 
20 75 F5 
20 FE F4 
A9 01 
20 Si P3 



J5R 
JSR 
LDAIH 
JSR 
JSR 
JSR 
JSR 
JSR 
JSR 
JSR 



III 

yi 

III 
PIIVT 



TUE 17/JUN/86 PA6I 07 
MS els 



V 

IIA 

PRBYT 

CRLF 



get number o-f day of 
print name of day 



get number of day of month 
print day of month 
get number of month 
print na«e of mmth 
get year 
print ymtf . 



LOAItl $0i 
JSR MPtCWft 



DA46 


4C 


0C 


M 




JHP 










*## 


Auxilitf 


DA49 


20 


75 


¥5 


I 




DA4C 


At 


m 




II 




DA4E 


2C 










DA4F 


A9 


2F 




lift 




DA51 


20 


5D 


F3 


in 


JSR 


Dh54 


ti 








m 


DA55 


A2 


0A 






iMIi 


DA57 


8E 


C8 


EF 




> sf 1 


DA5A 


AD 


C9 


EF 






DA5D 


30 


FB 






mi 


DA5F 


M 


IB 


M 




LDXAY 


DA62 


BE 


CI EF 




SIX 


DA65 


AD 


Cf 


EF 




LM 


DA68 


60 








RTS 



■ f 

NPRCHA 



ill 



CLKADR 

C4K0AT Update in proQirtss? 
UIP? yes; wait 

RE6 

EtKMT read clock registers 



«**##*tf* •»#*#;### ##*### 



DA69 


C9 


10 




V 


&»m fit 


DA6B 


90 


02 






ICC 


m 


0A60 


19 


07 






SBCIH 


f07 


DA6F 


69 


07 




¥A 


AtCIH 


$07 


DA71 


§5 


fC 




m 


mm 


T0IP 


BA73 


0A 








AtlA 


DA74 


18 








CLG 




DA75 


65 


FC 






ADCZ 


TEMP 


DA77 


AA 








TAX 




DA78 


BD 


A4 


m 


M¥HQN 


LDAAX 


DAYS 


0A7B 


30 


06 






B«I 


DAY 


DA7D 


20 


5D 


F3 




JSR 


NPRCHA 


DA80 


E8 








INX 




DA81 


50 


F5 






BVC 


DAYMON 


DA83 


29 


7F 
SB 




DAY 


ANOIH 


*7F 


0A85 


4C 


F3 




J MP 


NPRCHA 



(OCT/NOV/iEC linary Coded Decimal) 
convert to hexadecimal + carry 
ai# tfisflac#»tnt in table + carry 
ittltiply by three (3 letters by namel 

( + 1) 

^transform pointer) 



#*# BtAl tiftf el©ck - «ttxiU«r Ithles ##* 



fiA88 99 
DA89 12 
DA8A 31 
DA8B 07 
DA8C 23 
DA8D 59 
0A8E 59 

DA8F 09 
DA90 08 
DA91 07 
DA92 06 
DA93 04 
DA94 02 
DA95 00 

0^96 00 
DA97 00 
DA98 00 
DA99 00 
0A9A 00 
DA9B 00 
0A9C 00 



HAX 



A0DRES 



DATA 



*99 
$12 
*31 
$07 
$23 
$59 
$59 

$09 
$08 
$07 
$06 
$04 
$02 
$00 

$00 
$00 
$00 
$00 
$00 
$00 
$00 



maximum value for input 



ni 0 n t n 
week 



year - 
month 
day 0 + 
day of 
hour 
mi nutes 
seconds 



adj^ress of the clock-registers for SETCLOCK 



temporaries for inputed clock data 



IB 5 □ S 



NUMBER THE SmW 


PtOMTINB CY 


(W&.J) 


05730: DA9D 04 


RPR 




*04 


05740: DA9E 02 






$02 


05750: DA9F 00 






$00 


05760: DAA0 06 




- 

z 


$06 


05770: DAAl 07 






$07 


05780: DAA2 08 






$08 


05790: MA3 09 






$09 


05800: 








05810: 








05820: DAA4 2D 


umfw 






05830: DAA5 2D 








05840: Mkb 2D 






' - 


05850: 








05860: DAA7 44 






'D' 


05870: DAA8 4F 






'0 


05880: DAft9 CD 






'ff 


85890: 






'S 


05900: DAAA 53 




S 


05910: DAAB 45 






'E 


05920: DAAC G7 






'6 


05930: 








05940: DAAD 54 






'T 


059§|{ DAAE 45 






'E 


05f&i! tSAF it 






■R 


05970: 






'Q 


05900: DAB0 51 






05990: DABl 55 






'U 


06000: DAB2 CI 






'A 


06010: 






'Q 


06020: QAB3 51 






36030: DAB4 55 






'U 


06040: DABS C9 






' I 


06050: 






S 


06060: DAB6 53 






06070: DAB7 45 






t 


06080: DABS D8 




_ 


' V 


06090: 








06100: DAB9 53 






' S 


06110: DABA 41 






'A 


06120: DABB CZ 








06130! 








06140: 








06150: DABC 4A 






'J 


06160: DABD 41 






'A 


06170: DAB£ CE 






'# 


06180: 








0619!3: DABF 46 






'F 


062i2i2: DAC0 45 






'E 


06210: DACi D6 






'¥ 


06220: 








06230: DAC2 4D 






" f 


06240: DAC3 41 






'A 


062 50 J W£4 12 






'R 


06260: 








06270: DAC5 41 






'A 


06280: DAC6 42 






'B 


06290: DAC7 D2 








06300: 








06310: DAC8 4D 






'n 


06320: DAC9 4J 




z 


'A 


06330: DACA C9 






'I 


06340: 








06350: DACB 4A 






'J 


06360: DACC 55 






'M 


06370: 0ACD CE 








06380: 








06390: DACE 4A 








06400: DACF 55 






'y 


06410: DAO0 CC 






* L 


06420: 








06430: DADl 41 






'A 


06440: DAD2 47 






*i 


06450: DADS EF 






'fl 


06460: 








06470: DAD4 53 






'i 


06480: DADS 4S 








06490: DAD6 D4 






'7 


06500: 








06510: DAD7 4F 






•Q 


06520: DAD8 55 






■u 


06530: DAD? 154 






■J 


06540: 









22:03:58 - TUE i7/JUN/86 PABE 08 
registers' order for foriBattiti re#ri"ClQck 

.! ■ 1 

f '1 

. 1 tta»»s of days and iRonths ; 

fiimk trans lats is year om' lMii§m9» 

1 SuTidaY 

2 Hetiday 

3 Tuesday 

4 Hed^esdMy 

5 Thtitsdimf 

6 Friday 

7 Saturday 

1 January 

2 February 

3 Harch 

4 April 

5 Hay 

6 June 

7 July 

a August 

9 Septesbsr 

10 Qctater 




Ef E S HI 2 



KEIMMEIR 



NUMBER 

06550: 
06560: 
06570: 
06580: 
06590: 
06600: 
06610: 
06620: 
06630: 
06640: 
06650: 
06660: 
06670: 
06680: 
06690: 
06700: 
06710: 
06720: 
06730: 
06740: 
06750: 
06760: 
06770: 
f67ii: 
06790: 
06800: 
06810: 
06820: 
06830: 
06840: 
06850: 
06860: 
06870: 
06880: 
06890: 
06900 : 
069 10: 
06920: 
06930: 
06940: 
06950: 
06960: 
06970: 
06980: 
06999: 
07000: 
07010: 
07020: 
07033: 
07040: 
B7053: 
07063: 
07070: 
07380: 
07090: 
07100: 
07110: 
07120: 
07130: 
07140: 
07150: 
07160: 
07170: 
07180 
07190 
07200 
07210 
07220 
07230 
07240 
07250 
07260 
0727B 
07280 
07290 
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MM 4E 
MiB 4F 

smt §4 

DADD 44 
DADE 45 
DADF DA 



DA Ed 0D 

DAEl 0A 
DAE2 41 
DAE3 4E 
DAE4 4F 
DAE5 3A 
DAE6 A0 
DAE7 4D 
DAE8 45 
iAE9 5:3 
S#IA 20 
DAEB 4E 
DAEC 2E 
MID m 

DAEE 44 
DAEF 49 
DAF0 41 
DAFl 20 
DAF2 44 
0ftF3 4F 
DAF4 28 
DAF5 40 
DAF6 45 
DAF7 53 
DAF8 20 
DAF9 4E 
DAFA 2E 
DAFB A0 



DAFC 44 
DAFD 49 
DAFE 41 

j'"- 20 

: 1- ; c 4 4 

41 

DB03 53 
DB04 45 
DB05 4D 
DB06 41 
DB07 4E 
DB08 41 
DB09 20 
DB0A 4E 
DB0B 2E 



DBeO 4h 
DB0E 4F 
DB0F 52 
DB10 41 
DBll 53 
DBi: 
DBi; 



3A 
A0 



DB14 4D 
DB15 49 
DB16 4E 
DBi7 
DB18 
DB19 4F 
DBI A 53 
DBIB 3A 
DBIC A0 



55 
54 



•H 
■Q 

'¥ 

D 
'E 
2 



$m 

$0A 

•ft 
'N 
'0 



'M 
E 

'S 



'D 
'I 
'A 

D 

;o 

'M 
'E 
;s 

'H 



' I 

'A 
'D 

;a 

'S 
'E 
■H 
A 
N 
ft 



'H 
'0 
'R 
'A 



'H 
'I 
'N 
'U 
■T 
'Q 
'S 



ti Hovewber 
12 fieceiijer 



text-prorapts -for data input 
>'ear : 



Honth M. 



Day of Monih H. 



Day of Heek H. 



Hours : 



Hinutes : 



20 



BS a s 



DBID 53 
DBIE 45 
DBIF 47 
DB2e 55 
DB21 4E 
DB22 44 
DB23 4F 
DB24 53 
DB25 3A 
DB26 A0 



S 
'E 
'6 
'U 
■N 
'D 
'0 
'S 



Seconds; 



07300: 
07310: 
07320: 
07330: 
07340: 
07350: 
07360: 
07370: 
07383: 
07390: 
07480! 

>S 

SOURCE SPACE: SJftiT 2Ati END C000 . CURB-mX ftW FREE i.25247 

SYMBOL TABLE: STftfft £180 END CE00 CURR-MAX C2ft« FREE 121 If 

STILL PLACE FOR 0364 ENTRIES 
XREF Tftfiii: START CE80 END D800 CURR-MAX D319 FREE 01255 
STILL PLAftg .FfR 92^1 EiTiliS 



Mr. J.C.Rix 

3, Sutton Drove, ' , 

SEAFORD, 

SUSSEX, BN25 3EU Elektor VDU cg^rd jigiMgi^cgtA^^ 

ENBLAND. ' ' ' """" ' 

4 k RAM 

This i a very straightforward alteration involyifiqi tks iidtii ti on o-*' an e^tra 
lilts RftM chip mounted -piggyback' on the i st i ng 6!tS. tin both 6fM*s pin IS rs' 
Bfil ade out separately and connected as di agram btlcw. One of the isul t iple>;ers is njt 
used in the original design so I have used this for the additional addres'^ line (All). 



All 



HAM 
6845 
,pl5 




ic i: 



cs 

6116 pJB wpfier RftM chip 
6116 pit |«»er t^M chip 



Hon f 1 i cker 

This i^l- 



w 1 



r B ni u V e the 



s n IS V 



svi no 



SCI- eeri flicker caused by procsssisr 



access. I used two type 74i.S04 chips for the inverters, and rB-ussd N32 !3 input- Nj^NB 
oate) . 



6845 CLK 
p21 



74LS163 QB pi3 
Pad X or 

Pad z mm 



._.J ?^i-S15^ 




SEL pi 



6116 WE 
p2t 



If any of your members have a better solutiDh to the screen flicker pr&hlesi I 
would he pleased to hear about it. 
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KENIMEIR 



New CEEiNTRONIC routine for the 



mz JUNIOR/DCTOPUS 65 



Author 



i Coen Boltjes 
sElya van der Veer 



015-136812 



VIDIBUS 400029830 



After readinc;^ the Elektuur Computer Special Issue 2 I stepped up the 
•frequency of the clock of my DDS-Junior to 2 MHz. After testing the 
computer appeared to function well,, without the faster I/O chips 
model as. (I only use a 65C02) Also, it appeared that the waiting loops 
for the drive did not have to be adjusted. (A TEAC FD55-BV is used) 
I did have to change the CENTRDNIC routine for the printer. The VIA 
is programmed in such a way that a handshake-pulse is provided auto- 
matic! y when new data are presented,, However, the size of the pulse 
is dependent on the frequence of the clock of the computer. If the 
frequences is doubled the siz<~! of the pulse will be 500 nS. This ap- 

HX"-80 matri;-! printer, but my 

been de- 



■■ 8 C) (T) a t r i ;•! p r" i n t e r" , 
new programme has 



peared to be sufficinet for my EPSOM MX- 
BROTHEER CE--50 needed more,, Therefore, a 
vised generating a larger pulse. 
A f' t e I- t h e i n i t i a t i n g steps t hi e c: hi a r a c t e r is p u t on t h e d a t a !L i n e s . 
Then,, at CENTRE^' a waiting loop is executed in order to stabilize the 
signals. This enables one to use longer connection cables. The delay 
caused by the loop can be ignored i n " compar i son with the time needed 
to wait for the printer which usually does not exceed 100 Char /sec. 
Then,, the strobe pulse is generated by writing into the VAPCE^ $0C and 
* Ci E s u c c: e s s i v e 1 y . T Ei e p u 1 s e i is n o w 3 u !:> ,, w Ei i c l"i c a n be e n 1 a r g e d h y a d •■- 
ding some IMOf-'--i n struct i on s if nescessary. The length of the programme 
is smaller than tEie F-'aperware 4 routine. Thence, it can replace the 
o 1 d o n e . F' u r t h e r" m o r e ,, i t i s p o s <b i h 1 e t o u s e t Ei e i"i e w r- o u t i n e s o m e wi E i e r- e 
else by adjusting the output vector #4 ($2317). In that case the vec- 
tor ad r ess must bfa one less than the starting ad r ess of tEie routine. 
The routine can also be applied to the OCTOPUS 65. Then, one should 
take into account that the communication is dif-ferent here, so that 
a d d r esses and ma s k s m u s t be a d , j u is t e d . 



1 0 
20 
30 
40 
50 
60 
70 
80 
90 
1 00 
110 
1 20 
1 30 
140 
1 50 
160 
1 70 
1 80 
1 90 
20(") 
210 
220 
230 
240 
250 
260 
270 
280 
290 
3C>0 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 



SNEW CENTRO-ROUTINE WITH SOFTWARE 
SSTOBE OUTPUT FOR 2~MHZ JUNIOR/OCTOPUS 

I VIA DEFENITIONSs 

jj PA0-PA7 
; CAl 
S CA2 
; PBl 

! PBO 



DA TA OUTPUT 
/ACE< INPUT' 
/STB OUTPUT 
/PE INPUT 
SEL INPUT 



VIA ADRESSES 



FPOO.- 
FSO 1^ 
F802= 
i''"803= 
F80C= 
F80D" 

2363= 
F3E2 

F3E2 
F3E4 
F3E7 
F3E9 

F3EC 
F3EF 
F3F1 
F3F4 
F3F7 
F3F9 
F3FB 
F3FD 
F400 
F403 
F405 
F406 
F408 



A9FF 
8D03FB 
A90E 
8D0CF8 

AD02F8 

29FC 

8D02F8 

AD00F8 

4901 

2903 

D025 

AD6323 

8D01F8 

A200 

E8 

DOFD 
A90C 



VAPBD ■■■■ 
VAPAD ^ 
VAPBDI>-- 
VAPADD= 
VAPCR = 
VAIFR « 

^HOLD « 
*-^$F3E2 

iNIT 



•*F800 
VAPBD+flil 
■■VAPBD+$2 
'VAPBD+*3 
VAPBD+*C 
>VAPiD-+-«D 

«2363 



LDA #$FF 
BTA VAPADD 
LDA #*0E 
STA VAPCR 



LDA 
AND 
STA 

CENTRO LDA 
EOR 
AND 

BNE 
LDA 
STA 
LDX 

CENTRP I NX 
BNE 
LDA 



VAPBto 

#*FC 

VAPBDD 

VAPBD 

#*01 

#*03 

END 

AHOLD 

VAPAD 

#$00 

CENTRP 

#«!0C 



SPA0-PA7 OUffNJT 

5 CAl NEGATIVE SENSITIVE 

5CA2 HIBH OUTPUT 

5 LOAD OLD DD-RESISTER 

i;PAO--PAl INPUT 

;LOAD PE S< SEL INPUT 

H INVERT SELECT BIT 

5 ONLY BIT 0 AND i 

S->NOT SELECTED OR PAPER EMPTY 

SCHAR. ON DATA LINES 
SiNIT. DATA E;ET"UP TII^E 

?«=>SETUP TIME. NOT ENDED 



22 



PE§— ^ 1 — , 1"' 'I J — ■ KE:iM^4ER 



410 


P40A 


8D0Cf8 








420 

430 


F40D 


A90E 




LDA 


#*0E^ 


F40F 


8D0CF-B 




STA 


VAPCR 


440 


F412 


AD00F8 


CENTRQ 


LDA 


VAPBD 


450 


r*HD 


4901 




EUR 




460 


F417 


2903 




AND 


#*03 


470 


F419 


D007 




BNE 


END 


480 


F41B 


AD0DF8 




LDA 


VAIFR 


490 


F41E 


2902 




AND 


#*02 


500 


F420 
F422 


FOFO 




BEQ 


CENTRQ 


510 


AD0DF8 


END 


LDA 


VAIFR 


520 


F425 


OfOS 




QUA 




530 


F427 










540 


F42A 






nw 













; CLEAR ' STROBE OUWT' 

5 AND SET IT 
SLOAD Pg AND SEL 



=>N0 ACKNOWLgDSE 
LOAD FLASi 
SET BITS 0 AND 1 
RESET CAl AND CA2 



PflKRUARE SERVICE (ENGLISH VERSION) LIST OF PRICES 



All pricH inelttdinB forMrdj^n 
nil prices only for EaropNn I 



illMM, ftC. 



DISASSEMBLER FOR 65(002 (Roclwe!! VHViM^ 
Nico de Vries, The Netherlands. 

Derived froe the prograa originally itritten for the Apple 
U by Uozniah and Baiu. _ --^ 

This routine in aachinecode Hill run dire^y^^ CoMndore 
PET. bat e^ ti jdwl III ftliir M(#|*i« ,^ ^. 



DISASSEIOLER FOR 6S(C)02 (^rtek/6TE version) 
Nico de Vries, The Netherlands. 
Refer the announceient above. 

Send cheque of Hfl. 25,00 to U.L.v.Pelt (eurocheque 15,50) 

HRIIE? AND RERDROUTINE FOR ELEKTOR'S JUNIOR-COMPUTER 
Dick llok, The Netherlands. Uith thanks to Sebo Holdringh 
for his advices. Machinecode. 

Send cheque of Hfl. 15,00 to H.L.v.Pelt (eurocheque 5,50) 

LAME CHARACTERS UITH THE HHWBI 
Frans Bakx, The Netherlands. 

A set of subroutines in G9(B-«achinecode to print large 

OAIBRB. A database-prograa Hritten in Basic for Elektor's 
JUNIOR-coaputer Nith \nHH:ard and OHIO Scientific 0S-6S) 
V3.3 disk operating systee. 

Jan van Heuven, The Netherlands. Modified by Fernando 
Lopes, Portugal. 

Send cheque of Hfl. 30,00 to U.Lv.Pclt (eurocheque 20,50) 

VDU ROTATIie NEUSPflPER. 

IvD van Rijssel, The Netherlands. Translated by Frank Bens 
Nachinecode-prograe for Elektor's JUNIOR-coepijiej' with VDU 
Send cheque of Rfl. 15,00 to H.Lv.Pclt (euniiii * 



TYPE-AHEAD m PRINTER BUFFER 
Marcel Visser, The Nrthirlaiidf. 

Nachinecode-progrw iplpi)|l>frt|K^^^^ OI\ERSI- 

Sind cheque of Hfl. 3^,m tfr ilibv<liit-(ftfe#IMpi 

CENTRONICS PRINTER INTERFACE KVICE 4 OR 5 ON CiMBBIE S4 

Rued ^hoff. The Netherlands. Nachinecodf. 

SiNd iiBque of Hfl. 15,00 to M.L.v.PeIt (eurocheque 5.50) 

TCH(ENIZED Microsoft Basic KeyHords whS tSSrtmH MVhi ntf 

Elektor's JUNIOR KB-9 Basic. 

U.L van Pelt. The Netherlands. 

Send cheque o^ Hfl. U,S0 to H.LY.Pelt (Buroctaque 5,00) 



TOKENIZED Microsoft Basic Keywords and addresses SYM-1 
Basic. 

H.L van Pelt. The Netherlands., , , , ^, 

SMi^^Hqptif m t%Se'teilfeL»l,:Arlt (Mrs^ieqw 5,00) 

TOKENIZED HicmofI Basic Ki|MtR^ md addressiil AfW-£S 
Basic. 

y.L. van Pelt, The Netherlands. 

Send cheque of Hfl. 14,50 to H.Lv.Pelt (eurocheque 5,00) 

TOKENIZED Microsoft Basic Keywords and addresses ftPPLEsoft 
U.L. van Pelt, The Netherlands. 

Send cheque of Hfl. 14,50 to H.Lv.Pelt (eurocheque 5,00) 

TOKENIZED Microsoft Basic Keywords and addresses CBM 40XX 

and CBN 80XX. CoModore Basic 4.0. 

Nico de Vries. The Netherlands. 

Send cheque of Hfl. l«,!SrtNr iiL.v.i!ill ^meheqw 5,00) 

TOKENIZED Microsoft Basic KcyNords and addresses C - IS 

Couodore Basic 3.5. 

Nico de Vries. The Netherlands. 

Send cheque of Hfl. 14,50 to U.L v. Pelt (eurocheque 5,00) 

TOKENIZED Microsoft Basic Keywords «nd acktmses CBM 30XX 
CoModore asic 2.0. 

Nfeft de Vri^, The. Netherlands. _ ^. 

S^^# 0^ m. 14.50 to U.L.v.Pelt (eurocheque 5,00) 

TOKENIZED Microsoft Basic fteyNords and addressM VIE-20 
CoMMdore Basic V2. 

Nico de Vries, The Netherlarxis. 

Send cheque of Hfl. 14,50 to U.L.v.Pelt (eurocheque 5,00) 

PATCHES ON KlM-1 MICROSOFT BASIC FOR ELEKTOR'S JUNIOR-comp 
Keen van Nieuwenhove, BelQiui/H.L. van Pelt, The Netherl. 
Uith PMODE, TRACE, STEP RESET. PRINTER PB. , VIDEO, flUTO, 
RENUMBER, DflTASflVE, EDIT LINE, APPEND. 
Send cheque of Hfl. 24,50 to U.L v. Pelt (eurocheque 15,00) 

NICRO-UARE Assetbler/Editor with bank-switching 
Coeplete sourse-listing (Disasseeblcr not inelttAid} 
Author: Fernando Lopes. Portugal. 
Systet: Elektor's JUNIOR-coiputer with VDU and 0S65-D DOS 
Ifith MM COMMUKhi PUT FILE, PUT TT, LOAD FILE, LOAD TT, 
toggli esfrtreniCB flag, return to kernal, and aodified 
error routine, and new subroutines DECBPF, INCBPF, SETPM- 
SETSC-SETPF, PRTDAT to read data and tiae froe the Real 
Tiee Clock and to print it in the header lines, SETBKO- 
SUAPDN-SAVENK-RSTBNK to eanage the bankmitching, LINE 
NUMBERS. 

Refer t DE 6502 KENNER, May 1966. p. 44-47 

Hardware article ^Bank Switchina for the JUNIOR- 
coaputer' by Fernando Lopes. Portugal. 

Send cheque of Hfl. 45,00 to H.Lv.i>elt (ciirochiqus 35,50) 
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aipMS m&m de ledea van de KIM 

Het bestuur van de KIM 
Gebruikersclub Nederland heeft 
besloten een enquete onder de leden 
te houden, teneinde in staat te zijn 
een beleid te voeren dat gebaseerd 
is op de wensen en ideeen van de 
leden. 



mmSM mam ^ Maafeg ra of the KIM 

^iWfe^^ Wte: mmMBifZ 7~"^ — ■ — 

The executive committee of the KIM 
gebruikersclub Nederland has decided 
to hold an enquiry amone the m^nbers 
of the club, in order to be able to 
develop a policy based on the ideas 
and wishes of the 
themselves . 



U vindt de enouete op de 
middenpagina's van ait mmmT. Ite 

enquete kan in twee delen gesplitst 
worden. Het eerste deel is bedoeld 
om het bestuur een idee te ^even van 
het bestand sian systemen binnen de 
club en wat de drijfver^i 2ijn van 
die^enen die zich met deze computers 
bezig houden. Dit betreft de vragen 
1 tot en met 5« 

Het tweede deel (vraag 6) bevat 
vragen die het bestuur moeten helpen 
e^n goed beleid voor de toekomst 
stippelen. 



Deelname aan de enquete is geheel 
vxijwillig, terwijl u ook niet 
verplicht bent alle vragen te 
"beantwoorden. 



You will find the Dutch veraic^, of 
the enquiry in the ittiddle of this 
•issue. However, if you prefer an 
enquiry in English, please apply for 
one at the address below. You will 
then receive the same document, 
written in English. 

This enquiry is comprised of two 
parts. The first part is meant to 
give the committee an idea of the 
number of systems our members own 
and use, and wimt purposes they are 
used for. IQie questions 1 throij^ 5 
are meaiit"ftjr tMs purpose. • • 

The second part (question 6) 
contains questions to help develop a 
.-polioy for-ffelp ^tsia^.^; . ^ :• 

lw%icipatlon' fn-iilils enquiry !»; 
completely voluntary. It is also not 
mandatory to answer all questions. 



Teneinde de deelnemers aan deze 
enquete enigszins te belonen voor 
hun moeite heeft het bestuur een 

aantal presentjes beschikbaar 
gesteld die verloot zullen worden 
onder diegenen die niet anoniem aan 
de enquete deelnemen. Bestuursleden 
zijn deze verlotins uitgeslo-beii. 
Beschikbaar zljn de volgei^e 
present jes: 

10 EPROMs 2764 

10 paar diskettes, (5-25 inch, leeg) 
5 SRAMs 4564 (Sk x 8) 



De verloting zal plaatsvinden op de 
bijeerikomst te Rijswijk (Zh.) op 15 
november 1986. De Voorzitter zal dan 
uit de inzendingen de winnaars 
tr^feen. , „ 

Wilt u de ingevulde enquete voor 1 
oktober 1986 gefrankeerd sturen 
naar: 

N. de Vries 

Mari Andriessenrade 49 

2907 MA Capelle aan den IJssel 

Nederland • — i . 

Het bestuur dankt u alvast voor de 
genGHien moeite. 



To encourage you to participate, 
the committee nas available some 
little presents. These are to be 
raffled among those participants 
that have filled in their names and 
addresses on the questionnaire. 
Members of the committee are 
excluded from the raffle. The 
following presents are available s 



10 EPROMs 2764 

10 sets of two diskettes <f^^ 
empty) 

5 SRAMs 4364 (8k x 8) ' 

The raffle will take place on the 
club meeting in Rijswijk on November 
15th 1986. The chairman will then 
draw the winner from the enquiries 
received before the closin^Jp^ij. , 

Please return the completed 
questionnaire before October 1st 
19B6, postage paid, to: 

N. de Vries 

Mari Andriessenrade 49 

2907 MA Capelle aan den IJssel 

®ie Setherlands 



The committee thanks you 
for your trouble. 



advance 



1. B&r^cr^ 'Ti'Vf^'**'*- 

ludjyai u er de vooriceur aan geeft anoni^ 
te biljven, kunt u verder gaan met de 

(U komt dan NIEI in aannerking voor de 

verloting) . 

A. Wat is uw naam? 



B. En uw adres? 



C. Wat is uw beroep? 



D. Geslacbt: [ ] Man 



[ Vrouw 



] jonger dan 15 jaar 
] tussen 15 en 25 jaar 
] tussen 25 en 35 jaar 
] tussen 35 en 45 jaar 
] tussen ^5 en 55 jaar 
] tussoi 55 en 65 jaar 
] ouder dan 65 Jaar 



F. Spredct u Bagels of kunt u ^els 
lezen? 



£ i Ja 11 Bedelijk [ 1 Hee 



2. Gegev«is betyg 
k. Weike coDpiter(s) heeft u? 



] Junior 
] Apple ][ 
] Acorn Atcm 
] m 
[ ] SYM 
] PET 

] CBM 30XX,40XX of 8032 
] OCTOPUS/SAMSON65/EC65 
] Geheel zelfgebouwd 



I 3 D0S6S . , 

[ ] BBC 

[ ] Acorn Electpon 

[ ] Proton 

[ ] AIM 

[ ] Commodore 64 



B. Hoe lang beefb ii id. <mi computer? 

[ ] korter dan een jaar 

[ ] 1 a 2 jaar 

[ ] 3 a 4 jaar 

I J langer, nl. .... iaar 



C,, operating system ^ 

[ ] OHIO 0S65D> 
[ ] D0S65 

[ ] Koen van Nieuwehove's DOS 

[ ] Ik gebruik alleen de software In de 

(EP)RC»ds van de computer 
i ] Anderej n.l«t • 



D. Welke zaken maken deel ult van m 
systeem? 



] Hex display en keyboard 

] Monitor/ ASCII toetsenbor^ 

] Tenoinal 

J Tiesletype 

] Matrixprinter 

] Daisywheelprinter 

] Diskdrive(s) , 5.25 inch 

] Diskdrive(s) , 8 inch 

] Diskdrive(s) , 3 of 3.5 imh 

] Winchesterdisk 

] Cassetterecorder 

] bfcxlem 

] EPROM-programmer 



E. Waar gebrulkt u m systeoa het meest 

voor? 



] Administratie, bedrijf 
] Adndhlatrifcije, prlv* 

] Tekstverwerking 

] Bestandsbeheer ('database') 

] Ontwikkelen van software 

] Ontwikkelen van hardware 

] Besturingen 

] Spelen van spellet jes 

] Laponeren van de buurman 



2f Bi 5 D iS 



KEIMNEIR 



3. Sanmam, 

A. Op welk niveau jjent u aktlef m.b.t. 
software? 



[ ] Ik Interesse^ jii i^j^qit*^ ifioor 
hardware 

Ik kopieer alleea stsflNii^'i^ 
anderen ■ 
] Ik verbeter progranma's ifdia andereQ 
] Ik schrijf zelf wel eens &$et 
progranma 

] Ik schrijf de meeste progranma's zelf 
[ ] Ik schrijf alles zelf, operating 
us, iDOQitorpixigraiiina's, enz. 



[ ] 

[ 
[ 

[ 



B. In welke coDq>utertalea kunt o 
progranmeren? 



[ ] Hex 

[ ] BASIC 

[ ] PASCAL 

[ ] ibidere, n.l. 



[ ] Assembler 
[ ] FORTH 
[ ] C 



E. Heeft u een voorkeur voor een bei^talde 
eissembler? 

[ ] Moser (ASM/TH), MAE) ' 

[ ] Micro-Ada 

[ ] AS uit DOS65 

[ ] Ik ken er maar een, n.l. 



[ ] Andere, 



F* ISm^ u behalve de 6502 ook ncg andere 
processoroi in machinetaal prcgranmeren? 



C ] 6800 

[ ] 1802 

[ ] SC/MP 

[ ] 68000 

[ ] 



[ ] Z80 

C ] 2650 

[ ] 6809 

[ ] 8086/8088 



C. In welke taal progranmeert u 
vo(»?naiDellJk? 

[ ] Hex [ ] Assembler 

[ ] BASIC [ ] FORTH 

C ] PASCAL [ ] C 

[ ] Andez^, n.l. 



G. ttat vindt u van uw kennis van 

[ ] Slecht 

[ ] Ik me ermee redden 

[ ] Voldoende 

[ ] Ik ben er go^d in 



D. wat is uw f^s^Kortebe computertaal, en maiteff 



4. Haapdware. 

A. Op welk niveau bent u aktief m.b.t. 
hardware? 

C ] Ik heb er ge&a vet^tand viir^! :0e koop 
alles. 

I ] Ik bouw wel eens e&a print je (bijv. 

van Eldctuur) 
t ] Be heb mijn ctxiplete systeem zelf 

gebouwd . 
[ ] Ik ontwerp zelf hsirdware 
[ ] Be heb mijn cooq}lete :^ste«n zelf 

ontworpen. 



B. Zou u assemblagewerk voor de club 
willen doen (bijvoort>eeld DOS65 FDC- 
kaarten bouwen)? 

[ ] Nee [ 3 Ja 



C. Kunt u zelf print jes msk&a7 

[ ] Nee 

[ ] Ja, maar ik vlnd het teveel werk* 

[ ] Ik plak zelf printj^, 

[ ] Ik ets zelf prist J^k ' 

[ ] Ik plak en ets printjes. 

[ ] Ik werk met CAD/CAM. 



D. Kunt u e^ datasheet van em IC lezen 
m interpreteren? 

[ ] Ik snap er geen jota van. 
[ ] Ik kijk alleen naar de pin- 

aansluitingen 
[ ] Ik begrljp het meeste wel. 
[ ] Ja. 



5. He dife. 



A. Geef het clubblad eens em l«9i»rk- 
djfer (1-10)? 



E. WeUce artikelen laoetai er meer la bet 
duli^lad verschijnen? 



6^ lEit viBdt. u vaa ciaderdeileQ/a^)ectea van bst 



Het redacticnele pi^t je 
Uitnodjgiijg voor de bljeesSccmsten 
sgt^Smlm in verbal^e sbljl 

BASIC lLstlJ%s 
fOROI listings 
Harduare cntwerpai 

van dubartdl^en 

De " 



Goad Genriddeld Slecbt 



• c.^ K«« « ••••••••••• 



• )1 



F. Welke artdkeLen aaetiee ef ffilzi^er In 
bet chibblad verscdii^^ieo? 



C. Scbrljft u wel eois voor de 6502 



[ 1 Noolt 
[ ] Af toe 



[ ] Welnig 
C ] RggelaBt jg 



D. In vsHim taal moet bet oXutelacI zijQ? 



] Alleoi maar in het Ifederlands 
] Nederlands &j eea beet je Eiigels 
] Nederlands ea Engels door elkaar 
] Nederlands &i een beet Je Duits 
] Nedai'laxis ediibits door elkaar 
] In het Eiigels 
] In het Duits 

] AUierlei tE^Len dcptr eUlcaar 



G. Heeft u ncg verdere cpaeridngen over 
bet cTiajblad? 



6 . Yragao oa bet toekoasUg beleld te 
bepalen. 

A. Wilt u aktief in de club zijn, en zo 
ja, waarin? 

[ ] Nee, ik ben lid voor het blad. 
[ ] Nee, Ik heb er te weinlg tijd voor 
[ ] Ik zou artikelen willen schrijven 
[ ] Ik zou hardware willen ontwikkel§n 
[ ] Ik zou software willen ontwlkkelgi 
[ I Ik zou eeo M jeecOasmst nUl^ 

(helpen) organlserea. 
[ ] Ik zou in bet b^tuur wlUeii zitten. 
[ ] Ik zou spre^beurtai/lezingen wlll«a 

houden 

[ ] & ssou vertaa3w»il €si^ 



B. De club heet thans KIM Gebruikersclub 
Nederland. Moet deze naam veranderen? 

[ ] Geen mening 
[ ] Nee 

[ ] Ja, want 



C. Wat zou u een goede nieilMe naam voor 

de club vlnden? 
(Tips: 1 . Geen CPU-nunmer in de naam 

2. geen mericnamen in de naam 

3. belie ht -lilljgH>spect 

4. een Engelse naam mag ook 

5. de naam moet ganakkelljk in het 
i^titeqpn bliJvHQ bang^) 

[ ] De 6502 Kenners 
[ ] ENCC (Eerste Nederlandse Coqputer 
Club) 

[ ] FDC (First Dutch Goo!pit«*olab} 

[ ] Club65+ 

[ ] ioiderei bijv.: 



F. Wilt u uw antwoord op de vragen D. en 
E. mlssohim toellohtea? 

*'•«•'•«•«'•■• ••••• •••«•••.«. *.«' « » « • • ^ ■ ■ 



G. Ziet u een logische 'opvolger' voor de 
6502? 



[ ] 65C02 

[ ] 6800 

[ ] 6809 

[ ] Andere, n.l. 



[ ] 65816/65802 
[ ] 68000 
[ ] Geen 



H. Komt u wel eens eea olub- 

bijeenkomst? 

[ ] Nooit 

[ ] Alleen bi^ in de buurt 
[ ] Af en toe 

[ ] Ik kom op alle bijeenkoosten 



I. Wat vlndt m ift 
[ ] Slecht [ ] Nati£ [ ] Goed 

J. Wat vindt u van de leasing^ -c^ de 
bijeenkomsten? 

I ] Sleeht [ ] Hatig [ ] Goed 



K. Heeft u nog suggesties voor de 
biJea:d£omstai? 



D. Wij houden ons tot dusver alieeii ae^ 
de 6502 bezl£. Moet (en) daar nog andere 
processor(s) bijkcxnen (bijv. 1 6-bit)? 



[ ] Ja [ ] Nee 

Dit was 't. 

1. liset de club prooe^x»M)naflartE^dJc Bedadct rocxp m tlji en moeite. 

worden? 

C ] Ja [ ] Nee 

Het Bestuur. 



1 

> 1 
>2 
>3 
>4 
>5 
>6 
>7 
>8 
>9 

> 10 

> 11 

> 12 

> 13 

> 14 

> IS 

> 16 

> 17 

> 18 

> 19 
>20 

II 
>^ 

>25 
>26 
>27 
>28 
>29 
K3Q 
>31 
>32 
>33 
>34 
>35 
>36 
>37 
>38 
>39 
>40 
>A1 
>42 
>43 



PUT CHESS 1. 1 



)016 


■ 84 


83 


85 




)019 


. 86 


82 


85 




)01C 


83 


84 




>47 


>01E 


80 


80 


80 




)021 


80 


80 


80 




)024 


80 


80 




>4S 


>026 


00 


00 


00 




'029 


00 


00 


00 




)02C 


00 


00 




>49 


)02E 


00 


00 


00 




)031 


00 


00 


00 




)034 


00 


00 




>50 


)036 


00 


00 


00 




>039 


■ 00 


00 


00 




)OXs 00 


00 




>51 


XSMt 00 


00 


00 


'■■1 


mi! 00 


00 


00 




>G44s 00 


00 




>04B: CI 


CI 


CI 




)049! CI 


CI 


CI 




)04C! CI 


CI 




>m. 


)04E: C4 


C3 


C5 




)051 


! C6 


C2 


C5 




)054s C3 


C4 




>S4 


1056 


■ 00 


0| 


OA 




>059 


13 


m 




)05C! Oft 






>55 



ZETI 

ZETII 

ZETIII 

PROM 

NflflR 

VAN 

NZET 

ITZ 

ZWRD 

STUK 

ROCD 

WRDE 

NIVO 

CZfi 

CZO 

PZET 

CZET 

MftXI 

MAX 1 1 

EPS 

HULP 

CKflZ 



BORO 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



$00 
$01 
$02 
$03 
$04 
$05 
$06 
$07 
$08 
$09 
$Ofl 
$0B 
$0C 
$0D 
$0E 
$0F 
$10 
$11 
*12 
$13 
$14 
*15 



0R6 $16 



««««* ***** «««»«* «««*« ««««* 

***** ***** ***** ***** 

***** ***** THOU T ***** ***** 

***** ***** **«»* ***** 

***** ***** 

««*«* SCHftftKPROGRflMMPi **♦#♦ 

*««*« *«««* ****** ***** ***** 

***** ***** ****** ***** *«*«« 

DDOR ! FRfiNS RftPIJMflKERS 
HOOeVENSESTRflftT 87 
5017 CB TILBUR6 
TEL. J 013 - S66S63 

8YSTEEM : JUNIOR MET INTERFflCE-KflflRT EN m Rfi« 
VftNflF *2000, OF VERe£LWPfl«;.itiTEEM. 
DlSPLfiY » 7 SE8«ENT-©1P^¥. 



ZERO PAGE LOKflTIES . : ■ 

PROMOTIESTUK 

NftflRVELD BESTE ZET 

VftNVELD BESTE ZET 

CODE PROMOTIESTUK 

NOPIRVELD ZET IN ONDERZOEK 

VflNVELD ZET IN ONDERZOEK 

ftPNTflL GELDIGE ZETTEN PER NIVO 

INDEXTflBEL ZETMOGELI JKHEDEN 

ZETWPflRDE PER NIVO 

STUK DftT WORDT SESLfiGEN 

ROCHftDE-CODE 

WfiflRDE VAN DE STELLING 

MOMENTELE ONDERZOEKDIEPTE 

CODE ZET AftNBRENGEN 

CODE ZET ONGELDIG 

H006STE flfiNTftL ZETTEN OP NIVO 2 

CODE SOORT ZET 

MfiXIMflLE ZOEKDIEPTE flLGEMEEN 
MAX I MALE ZOEKDIEPTE SLflGZETTEN 
VELDNUMMER PI ON EN PPlSSflNT TE SLflflN 
TEMP VOOR flLSEMENE DOELEIisUJEN 
mm KLEUR ftflN ZET 



PTZ 



DFB ♦84^*113, *85, ♦86, $82, tSS, taS, *m 

DFB «80,«8d,i60,t80,ti0,«d0,«a0,«80 

DFB 0,0,0,0,0,0,0,0 ,- 

DFB 0,0,0,0,0,0,0,0 

DFB 0,0,0,0,0,0,0,0 

DFB 0,0,0,0,0,0,0,0 

DFB tCl, »Ci, *Cl, »C1, »C1, «C1, «C1, tCl 

DFB *C4, tcs, tcs, #es, tea, tes, «C4 

DFB too, tOS, fOfl, tlS, »iC, tOE, tOft 



25 



ke:nme:r 



005D 


! 01 


01 


00 


0O60 


! 03 


05 


03 


0063 


08 






0064 


: 05 


OF 


04 


0067 


: 24 


00 


15 


0060 


IF 


B4 




006C 


34 


00 


06 


006F 


■ 16 


22 


02 


0072 


26 


36 




0074 


. 06 


B6 


00 


0077 


: 2E 


3E 


OE 


0070 


BE 


66 




007C. 


i 76 E6 


F6 


007F 


■ 00 


06 


IS 


0082 


22 


02 




0084 


00 


04 


07 


0087 


38 


3C 


3F 


OOSfl 


40 


CO 


80 


008P! 10 


30 


20 



>57 TSW DFB 1,1,0,3,5,3,8 

TZET DFB *05,$0F,$04,$24,$00,»15,»1F,$B4 

DFB ♦«» «&6, * 16, %22, tfl2, *26, «36 

■ ' DFB $06, $B6, *00, *2E, *3E, *flE, »BE, $66 



>5a 



>59 



00i3:'£ 



00 00 00 

27 46. $^ 

17 » m 



>60 



>61 
>62 

>63 
>64 
>65 
>66 
>67 
>68 

>6g 

>70 
>71 
>72 
>73 
>74 
>75 

> 76 
>77 
>78 
>79 
>60 
>81 
>82 
>83 

>a4 

!i 

>93 
>94 
>35 
^96 

>m 

} 101 

> 1&2 

> 103 
\ 104 

> 105 

> 106 

> 107 

> tm 

\ 109 
) 110 

> 111 

) 112 

> 113 

> 114 

> 115 



DFB 

RCTI DFB 

RCTII DFB 

WIS EQU 
OZET EQU 
TEMP2 EQU 
TEMP3 EQU 
TEMP4 EQU 
TEMPS EQU 
TEMP6 EQU 
TEMP? EQU 
TEMPS EQU 
TEMPg EQU 
TEMPO EQU 
TEMPB EQU 
TEMPC EQU 
TEMPO EQU 
TEMPE EQU 
TEMPF EQU 
KOZ EQU 
KWIS EQU 
STKWRDKOZEQU 
STKWRDKNOZEQU 
STKNUMKOZEQU 
STKNUMKNOZEQU 
STELWRDLOBEQU 
STELWRDHOBEQU 
STUKWRDLOBEQU 
STUKWRDHOBEQU 
VELDTELLEREQU 
KOIMKNflZ EQU 
STUKIQ EQU 
POSITIO EQU 
SLOSTUK EQU 
DAMKNOZ EQU 
VONVELDHEXEQU 
VERT REKHEX EQU 
VERTREKREKEQU 
EERSTEVELDEQU 
BITSTUKIOEQU 
BITKflZ EQU 
BITKNOZ EQU 
BITKOZR EQU 
BITKNOZR EQU 
BITKflZL EQU 
BITKNflZL EQU 
RESl EQU 
RES2 EQU 
RES3 EQU 
POSWRDLOBEQU 
POSWRDHOBEQU 



♦76, tie, *F6, too, ♦06, *16, «22, *fl2 
too, to*. fO?, »38, *3C, tSF 
♦40, ♦CO, ♦BO, ♦!©, ♦SO, ^20 



$90 
$91 

$92 

TEMP2+1 

TEMP2+2 

TEMP2+3 

TEMP2+4 

TEMP2+5 

TEMP2+6 

TEMP2+7 

TEMP2+8 

TEMP2+9 

TEMP2+$0fl 

TEMP2+$0B 

TEMP2+$0C 

TEMP2+$0D 

$00 

$01 

$02 

$03 

$04 

$05 

$06 

$07 

$08 

$09 

♦00 

$0B 

$0C 

$0D 

$0E 

$0F 

$B0 

$B1 

♦B2 

♦B3 

$B4 

$B5 

$B6 

$B7 

$B8 

$Bg 

$B0 
$BB 
$BC 
$BD 
$BE 
$BF 



OR© mm 



WISSEL S i ODIUM BtREKENIIMB 

P-ZET VON Dt BtSTE ZET TOT NU TOE 

TEMP VOOR ftLBEMEEN SEBRUIK 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

IDEM 

KLEUR OON ZET 
KLEURWISSEL 

STUKWOORDE KLEUR OON ZET 
STUKWOORDE KLEUR NIET OON ZET 
OONTOL SiUKKEN KLEUR OON ZET 
flONTOL SiUKKEN KLEUR NIET OON ZET 
STELLINGWOORDE LOW Ol^DER BYTE 
SIELLINGWOORDE HIGH ORDER BYTE 
STUKWOORDE LOW OkDER BYTE 
STUKWOORDE HIGH OKDER BYTE 
VELDBEHEERSINfa SfUK IN ONDERZOEK 
PDSITIE KONiNG KLEUR NIET OON ZET 
SOORT STUK IN ONDERZOEK ■■ 
POSITIE STUK IN ONDERZOEK 
STUK OP HET NOORVELD 

OONWEZIGHEID DOME KLEUR NIET OON ZET 
VONVELD IN HEXODECIMOOL FORMOOT 
VONVELD IN D£ MOMENTElE S'lELING 
IDEM IN REKENFORMflOT 

EERSTE VELD VON DE LIJN REKENFORMOOT 

BiTKODE STUK IN ONDERZOEK 

BITKODE PIONNEN KLEUR OON ZET 

IDEM KLEUR NIET flON ZET 

BITKODE PIONNEN KLEUR OON ZET RECHTS 

IDEM KLEUR NIET OON ZET 

BITKODE PIONNEN KLEUR OON ZET LINKS 

IDEM PIONNEN KLEUR NIET fm ZET 

GERESERVEERD ' 

IDEM 

IDEM 

WOORDE BESTE ZET TOT DON TOE LOB 
WOORDE BtSTE ZET TOT DON TOE HOB 



y il6 PlONTflB DFB $00, $00, $00, $27, ^46, ♦66, ♦I?, $00, ♦OO 
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E^Ei 5 D lE! 



)C9: 


05 


05 


00 


)CC: 


10 


19 


12 


>CFi 


2D 






)D0: 


07 


FF 


F7 


)D3: 


F8 


F9 


01 


)D6: 


09 


08 




)D8: 


91 


90 


89 


)0B: 


99 


09 


10 


m: 


U 


01 





>lia STUKTftB DTB *0S^$OS,fOO,»iO,«19,»12»*2D 
>119 DIRHEX DFB *07, ♦FF, tF?, *F8, ♦F9, *0i, *09, $08 



>120 

> 121 

> 122 

> 123 

> 124 

> 125 

> 126 

> 127 

> 128 

> 129 

> 130 

> 131 

> 132 

> 133 

> 134 

> 135 

> 136 

> 137 

> 138 

> 139 

> 140 

> 141 

> 142 

> 143 
> 



144 

> 145 

> 146 

> 147 

> 148 

> 149 

> 150 

> 151 

> 152 

> 153 

> 154 

> 155 

> 156 

> 157 

> 158 

> 159 

> 160 

> 161 

> 162 

> 163 

> 164 

> 165 

> 16G 

> 167 

> 168 

> 169 

> 170 

> 171 
} 172 

> 173 

> 174 

> 175 

> 176 

> 177 

> 178 

> 179 

> 180 

> 181 




DISPl 
DISP2 
DISP3 



SCANDS 
SETKEY 



PAD 
PBD 



TIMER 



DFB 
ORG 
EQU 

ORG 
EOU 
EQU 
EQU 



EQU 
EQU 



EQU 
EQU 



♦91, tf©, 

♦El 

fEl 

♦F9 
♦F9 

DISPl+1 
DISPl+2 



♦1D8E 
»1DF9 



♦inai 

♦ lfld2 



EQU $1AF4 



NMIVECTLOBEQU $lfl7fl 
NMIVECTHOBEQU *lfl7B 
IRQVECTLOBEQU $1A7E 
IRQVECTHDBEW «lfl7F 



^♦99,»09,»l0,»ll,f01 
TOETSKFFER 

DISPLAYBUFFER 
IDEM 
IDEM 

MONITOR ADRESSEN 

TOON INHOUD DiSPLAYBUFFER 
,T^|S VAN HEX-PAD 

Pm ADRESSEN 

POORT A DATA REGISTER 
POORT B DATA REGISTER 

PIA TIMER ADRES 

CLKIT, DISABLE TIMER IRQ 

VECTOR ADRESSEN 



TD/DS 

MAINSMON 

CODEMON 



EQU $0590 
EQU ♦OSAS 
EQU $05F3 



VELDKODMON EQU $05FC 



plusmon 

DAMON 
ADMQN 
PCMON 



EQU $0629 
EQU ♦064F 
EQU ♦0683 
EQU ♦068D 



TOETSDETEKTIE/DISPLAY 
hOOFDROUTINE SCHAAKMONITOF 
CODE-ROUTINE 

VELDKONTROLE EN KODERING 

STUK VERPLAATStN 

S I UK PLAATSEN/VERWIJDEREN 

BORD VE6EN 

NIEUWE PARTIJ 



POSVAL ADRESSEN 



ADD 

TOTAL 

MULTIPLY 

DIVIDE 

SCAN 

KODEER 

VELDTEST 

NAARVELD 

AFSTAND 

EERSTEVELD 

STATUS I 

STATUS 1 1 

PAARD 

LOPER 

DAME 

TOREN 

PI ON 

KONINGI 

K0NIN6II 



EQU 


♦2000 ; 


ADD 


EQU 


♦200E ; 


TOTAL 


EQU 


♦2022 ; 


MULTIPLY 


EQU 


♦2077 ; 


DIVIDE 


EQU 


♦20DA ; 


SCAN 


EQU 


♦20FA , 


KODEER 


EQU 


♦2111 ■ 


VELDKONTROLE 


EQU 


♦212F 


NAARVELD , 


EQU 


♦2140 


AFSTAND 


EQU 


♦2174 


EERSTE VELD 


EQU 


♦219C 


STATUS I 


EQU 


♦21E0 
♦2227 


STATUS II 


EQU 


PAARD 


EQU 


♦22A2 


LOPER 


EQU 


♦2318 


DAME 


EQU 


♦238D 


TOREN 


EQU 


♦246E 


PION 


EQU 


♦2582 


KONING I 


EQU 


♦266C 


, KONING II 
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Ei 5 O E! 



2000 


: 4C 


9S 


2003 


: fi5 


9B 


2005 


: iQ 




2006 


! 65 


no 


2008 


: 85 


08 

no 


20 Oft 


: fl5 


9C 


200C 


: £5 


09 

n J 


200E 


: fiS 

■ \J\^ 


n -7 


2010 


: 60 




201 1 


" rivJ 


no 




: AS 




2015 


■ no 


Q7 
n / 


''017 


: flS 

■ CJ\J 




*- V J, J 


I 2.'0 


0 0 


20 IC 


: fl5 


QA 
no 


20 1 F 


: fl^ 


QA 
no 




■ pi%-j 


n -7 




: AS 


n f 


2024 


: A(*) 




^ ^ tj 


: 

■ 0*^ 


ay 


2027 


■ OH- 


^A 


2029 




qp 


2026 


: 84 




20 2D 


! fi=i 


99 


262F 


■ fC_) 


AA 

M-O 


203 1 


! 1 0 






■ 49 


n 1 




X LJ 




2036 




v X 


2038 


85 


99 


203fl 


C6 


97 


203C ! 


05 


90 


203E : 


FO 


39 


2040 ! 


10 


09 


2042 : 


49 


FF 


2044 : 


18 




2045 : 


69 


01 


2047 : 


85 


90 


2049 : 


E6 


97 


204B : 


46 


90 


204D : 


90 


OD 


204f : 


05 


99 


2051 : 
2052: 


18 




65 


9B 


2054 : 


85 


96 


2056 : 


05 


98 


2058 : 


65 


9C 


205fl: 


85 


9C 


205C: 


06 


99 


205E: 


26 


98 


2060 : 


05 


90 


2062 : 


DO 


E7 


2064 : 


05 


97 


2066 : 


FO 


U 



185 

186 
187 
188 
189 



) 190 

> 191 

> 192 

> 193 
y 194 



2 




Dl IT 


> 1 










DDR 


2C > 3 






> 4 




1 no 

L-UH 


) 5 




PI r 






HUL 


} 7 




O 1 H 


>8 




1 no 


> 9 






> 1 0 




D ! H 


> 1 1 

/XX 




DTC 
r( 1 a 


> r? 

/ X A. 


TflTQI 
1 U 1 HL. 




> 1 
/ 1 0 




a 1 H 


> 1 A 

/ X 




i nA 
LJJH 


> 1 s 




CTQ 


i. / X 0 






> 1 7 

/ X f 




1 HA 


> 1 A 

/ X 0 




CTQ 
0 1 H 


> 1 9 

/ X J 




1 HA 
LUH 






CTA 


/ jt. X 




DTC 




Ml II T T Dl V 


CTV 

a 1 Y 






CTV 

a 1 r 






CTV 

a 1 T 






CTV 

a 1 T 


> 26 


Ml 


1_UH 






DCLi 


> "^A 

/ A.O 






> 99 
) 30 








ft p 

wLLi 


> 31 

/OX 




HULr 


> 32 




CTQ 

a I H 


> 33 

/ 00 






> 34 


M? 


1 no 

LUH 


>35 




BEQ 


>36 




BPL 


)37 




£0R 


>38 




CLC 


>39 




ODC 


>40 




STO 


>41 




INC 


>42 


M3 


LSR 


>43 




BCC 


>44 




LDO 


>45 




CLC 


>46 




ODC 


>47 




STO 


>48 




LDO 


>49 




ODC 


>50 




STO 


)51 


M4 


flSL 


>52 




ROL 


>53 




LDO 


)54 




BNE 


>55 




LDO 


>56 




BEQ 



CHESS 1.2 

*2000 
PCMON 
TEMPB 

SrUKWRDLOB 
STUKWRDLiI 
TEMPC 

STUKWRDHOB 
STUKWRDHOB 

STELWRDLOB 
TEMPB 

STELWRDHQB 

TEMPC 

$2000 

STUKWRDLOB 
STELWRDLOB 
STUKWRDHOB 
STELWRDHOB 

TEMP7 
TEMPS 
TEMPB 
TEMPC 
TEMPg 
OUTM 
M2 

#»FF 
#1 

TEMP9 
TEMP7 
TEMPO 
OUTM 
M3 

««FF- 
#1 

TEMPO 
TEMP7 
TEMPO 
M4 

TEMP9 

TEMPB 
TEMPB 
TEMP8 
TEMPC 
TEMPC 
TEMP9 
TEMP8 
TEMPO 
M3 

TEMP7 
OUTM 



LEEG VELD ■ 00 

WITTE PION » 80 

K0NIN6 » 82 

POORD » 83 

TOREN » 84 

LOPER » 8S 

DAME » 8i 



ZWflRTE PION 

K0NIN6 

POARO 

TOREN 

LOPER 

owe 



INITIflLISERIh® 
8TUURR0UTINE 



CI 
C2 
C3 
C4 
E5 



INITIOLISEREN 

TEL Dfc. MOMENTELE WWftRDE 

BIJ DE STUKWfiflRDE 

EN BEWAAR MSULTAAT 



TEL STUKWOARDE 
BIJ STELLINGMAARDC 
MET BEHULP VAN ADD 

EN mmm i^bultaat 



; RESET 



NEEM ABSOLUTE WOfl^ 
VERMENI6VULDIGER 
JUMP OUT OLS VERM » 0 
SIGN = -1 ALS 
VERM » NESATIEF 



NEEM ABSOLUTE WAARI« 
VERMENIGVULDIGTAL 
JUMP OUT OLS VERMT » 0 
SIGN +1 ALS 
VERMT » NE»»TIEF 



SCHUIF VERMT NOOR RECHTS 
JUMP OLS CORRY = 0 
TEL VERMT BIJ PROD 



; SCHUIF VERM NAAR LINKS 

; JMP TOTDAT veRMT«0 

; NEEM 2 KOMPLEMENT VW» 

; ALS SIGN <> 0 
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2068 


! 05 98 






206fl 


: 49 FF 


>5§ 




206C 


: 18 


>60 




206D: 69 01 


>61 




206F 


! 85 9B 


>&2 




20715 fl5 gc 


>63 




2073 


: 49 FF 


}64 




2075 


: 69 00 


>65 




2077 


! 85 9C 


>66 




2079 


: 60 


>67 


OUTM 


207fl 


! 84 96 


>68 




207C 


: 84 9B 


>69 


207E 


: 84 9C 


>70 




2080 


: 05 98 


>71 


Oi 


2082 


: DO 06 


>72 


2084 


: 05 97 


>73 




2086 


! FO 54 


>74 




2088 


: 05 98 


>75 


<- . 


208fl 


: 30 08 


>76 


DIR 


208C 


: C6 96 


>77 


mm 


208E 


! 06 97 


>78 


2090 


: 26 98 


>79 




2092 


: 10 F8 


>eo 




2094 


! 05 90 


>81 




2096 


: DO 06 


>82 




2098 


: 05 99 


)83 




209fl 


: FO 40 


}84 




209C 


: 05 90 


>85 




209E 


: 30 08 


>a6 


tm 


20fl0 


: E6 96 


>87 


20fl2 


! 06 99 


>68 




20fl4 
20fl6 


! 26 90 


>89 




: 10 FS 


}go 




20fl8 


! 05 96 


>91 




20flfi 


! 30 30 


>g2 


20fiC 


! 38 


>g3 


03 


20flD 


! 05 97 


>g4 


20flF 


■ E5 99 


)g5 




20B1 


85 97 
05 98 


>g6 




20B3 


>97 




20B5 


E5 90 


>98 




20B7 


85 98 


>9g 




20B9. 


90 08 


> 100 


04 


20BB ! 


26 9B 


> 101 




20BD ! 


26 9C 


> 102 




20BF i 


FO 13 


> 103 




20C1 : 


DO 11 


> 104 




20C3 ! 


26 9B 


> 105 


D4A 


20C5 : 


26 gc 


> 106 


20C7 : 


18 


> 107 




20C8 : 


05 g7 


>ioe 


• 


20Cfl : 


65 gg 


>109 




20CC : 


85 g7 


) 110 




20CE : 


05 g8 


> 111 




20DO ! 


65 90 


> 112 




20D2 : 


85 98 


> 113 




20D4 : 


46 90 


> 114 


05 


<iOD6 ! 


66 99 


> 115 


20D8 : 


C6 96 


> 116 




20Dfl : 


10 DO 


>117 




20DC: 


60 


> 118 


OUTO 


20DDS 


06 m 


> iig 


SCON 


20DF ! 


CO 


> 120 


scmi 


20EO! 


30 18 


> 121 


20E2 : 


B5 16 


> 122 




20E4 ! 


FO Fg 


> 123 




20E6 : 


85 g4 


> 124 




20Ee: 


2g OF 


> 125 




20Eft: 


C5 OC 


> 126 




20EC! 


DO Fl 


> 127 




20EE: 


05 g4 


>128 




20FO: 


2g 40 


> 129 




20F2! 


4S 01 


>130 





St 

CLC 

mn 

STA 

urn 
Em 
ooc 

STfi 
RTS 
SfY 
STY 
STV 
LOA 



m 

BPL 
LOO 
BNE 
LOO 
BEQ 
LOO 
BI4I 
INC 



ROL 
BPL 
LOO 
BMI 
SEC 
LOO 
SBC 
STfl 
LOO 
SBC 
STfl 
BCC 

mt 

ROL 
BEQ 
BNE 
ROL 
ROL 
CLC 
LOO 
ADC 

»m 
im 

AOC 
STfl 
LSR 
ROR 
DEC 
BPL 
RTS 
LOX 
DEX 
BMI 
LOfl 
BEQ 
STfl 
ANO 

m> 

BNE 
LOO 
ANO 
EOR 



#1 

TEMPB 
#0 

TiNPC 

TENPC 
TEMPS 




OlAl 

TEMPft 

02A 

TEMP9 

OUTO 

TEMPA 

D2A1 

TEMP6 

TEMPS 

TEMPA 

D2A2 

TEMP6 

OUTO 

TEMP? 

TEMP9 

TEMP? 

TEMPS 

TEMPA 

TEMPS 

D4A 

TEMPB 

TEMPC 

05 

05 

TEMPB 

• mm- 

TEMP? 
TEMPS 
IEWP7 

mm 

TEMm 
TEMPS 
TEMPA 
TEMPS 
TEMPS 
03 'iv--.. 

mmmmx 

SCANOUr 
BORO, X 

scan! 

TEMP4 
#«0F 
STIKIO 
SCANl 
TEMP4 
#«40 
KWIS 



; RE^f ' 
; TEST DEELTAL 



; JUMP OUT OLS DEELTOL - 0 
; SCHUIF DEELTOL ZOVER 
; MOBELIJK LINKS 
; HOUOT OANTOL SHIFTS 
I BIJ IN TEMPS 



; TEST DELER 

; JUMP OUT MS OELER « # 



SCHUIF DELER ZOVER MOBELIJK LINKS 

WMJDTj AAlfriPM. SHIFTS BIJ IN TEW>S 

JUMP OUT OLS TEMP6 < 0 : 

DON IS DELER > DELTOL 

TREK DEELTOL VON DELER OF 



DRAAI CARRY IN QUOTIENT 
TEL OELER BIJ OEELTAL 
ALS {^RY m 0 



; SCHUIF OELER NOOR RECHTS 

; DECREMENTEER SHIFTTELLER 

; JUMP TOTDOT SHIFTTELLER < 0 

; X = VANVELD 

; J\Sm ALS X < 0 

; A « BORD 

; JUMP ALS BORD = BEEN S i UK 

; JUMP ALS STUK <) STUKIO 
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20F4S DO 


E3 


V 4 

> 132 






@QRN1 


20FGt 8fi 


BO 






sn 




20F8J FO 


02 


> 134 






aa5i«juT2 


20Ffl 


! A9 


FF 


) 135 


SCONOUT 


Lm 


20FC 


: 60 




> 136 


^WQUT2 iTi 




20FD 


: fl5 


Bl 


) 137 




urn 


VlRTRfKHEX 


20FF 


! 40 




>13d 




Lsm 




2100 


! 4fl 




> 13f 




Lsm 




2101 


! 4ft 




> 140 




LSRfl 




2102 


! 85 


94 


> 141 




STfl 


TEMP4 


2104 


! fl5 


Bl 


> 142 




LOO 


VERTRE*(^€X 


2106 


! 29 


07 


> 143 




AND 


#7 


2108 


: Oft 




> 144 




OSLO 




2109 


! Oft 




> 145 




OSLO 




210fl 


! Oft 




> 146 




ASLA 




210B 


i Oft 




> 147 




m.A 




210C 


! 05 


94 


> 148 




Qm . 




210E 


! 16 




> 149 






"■• . 


210F 


' 69 


1 1 


> 150 






'iKIIlJE',-:,-:- 


2111 


: 85 


B2 


> 151 




mn 




2113 


60 




> 152 




«TS 




2114 


B5 


08 


> 153 


VEUDKONTRLDfl 


DIRDEC, X 


2116 


18 




> 154 




CLC 


2117 


F8 




> 155 




SEO 




2118 


65 


B2 


> 156 




AOC 


VERTREKREK 


211ft 


D8 




> 157 




CLD 




21 IB 


85 


94 


> 158 




STA 


TEMP4 


211D 


29 


OF 


> 159 




AND 


#*0F 


21 IF 


FO 


OE 


} 160 




BEQ 


OUTVKl 


2121 


C9 


09 


> 161 




CMP 


#9 


2123 


FO 


Oft 


> 162 




BEQ 


OUTVKl 


2125 


ft5 


94 


> 163 




LDA 


TEMP4 


2127 


2'=) 


F(;) 


> 164 




AND 


#»F0 


2129 


FO 


04 


> 165 




BEQ 


OUTVKl 


212B 


C9 


90 


> 166 




CMP 


#♦90 


21 2D 


DO 


02 


> 167 




mE 


0UTVK2 


212F 


09 


FF 


> 168 


OUTVKl 


LDO 


#«FF 


2131 


60 




> 169 


0UTVK2 


RTS 




2132. 


B5 


DO 


> 170 


NftflRVELD 


LDO 


DIRHEX, X 


2134 
2135. 


18 




> 171 




CLC 


65 


Bl 


> 172 




ADC 


VERTREKHEX 


2137- 


85 


Bl 


> 173 




STA 


VERTREKHEX 


2139! 


86 


9D 


) 174 




STX 


TEMPD 


213B! 


ftfl 




> 175 




TAX 


213C: 


B5 


IS 


> 176 




LDA 


BORD.X 


213E. 


85 


RE 


> 177 




STA 


SLASTUK 


2140! 


ft6 


9D 


> 178 




LDX 


TEMPO 


2142! 


60 




> 179 




RTS 




2143! 


fl5 


99 


> 180 


flFSTAND 


LDA 


TEf«>i 


2145! 


29 


Oh 


> 181 




AHO 


#10F 


2147! 


85 


9B 


> 182 




STA 


TEMPB 


2149! 


05 


9ft 


> 183 




LDO 


TEMPA 


214B: 


29 


OF 


> 184 




OND 


#*0F 


214D! 


38 




> 185 




SEC 




214E! 


E5 


98 


> 186 




SBC 


TEMPB 


2150: 


10 


OS 


> 187 




BPL 


AFSTl 


2152: 


49 


FF 


> 188 




EOR 


#»FF 


2154: 


18 




> 189 




CLC 




2155: 


69 


01 


> 190 




ADC 


#1 


2157! 


85 


9C 


> 191 




sm 




2 1 59 : 


05 


99 


> 192 




LDA 


TEMP9 


215B: 


29 


FO 


> 193 




mm 




215D: 


85 


SB 


> 194 




STA 


TEMPB 


215F! 


05 


yH 


> 1 3D 




LDA 


TEMRm; 


2161: 


29 


FO 


> 196 




AND 


*mo 


2163: 


38 




> 197 




am 


2164: 


E5 


9B 


> 198 




SBC 


TEMPB 


2166: 


10 


05 


> 199 




BPL 


AFST2 


2168: 


49 


FF 


}200 




EQR 


mFF 


216ft: 


18 




>201 




CLC 




216B: 


69 


01 


>202 




ADC 


#1 


216D: 


4ft 




> 203 


flFST2 


LSRA 


216E: 


40 




>204 




LSRA 





; JUMP ALS KLEUR <> KMI8 u ; . 

; SAVE VANVELD 

; mm TEmB mr r*ff i Auf velden sehad 

; BEREKEN VERT I KALE 
; KOORDII«U)T 



BEREKEN TORIZCWTm^ 
KOORDINAAT 



NEEM KOORDINATEN BIJ EU^IAR 
TEL 11 BIJ RESULTAAT 

flBSMimATVlH VliT^CREK 

HAflL'IDECIMALE RICHTIN6TABEL 

TEL OP BIJ VERTREKRSC 
RESULTAAT I§ (4AARVELB 

KONTROLEER BELDlBHil& 
JUMP ALS MAARVELD « 




JUMP ALS tmmmji » @el^ 



HAAL HEXADECIMALE RlC«Tliilf1P!i^L 



TEL OP BIJ VERTREItCX 



; mmms m mmm v^thekveld 

; EN 2^ BAt IN SUSTUK 



; HAAL EERSTE VELD 

; DISIILLEER VERTIKALE KOORDINAAT 

; HAAL TWEEDE VELD 

; OISTiy.£&i VERTIKALE KOORDINAAT 

; BEREKEN HET VERSCHIL 

; BEmm <^pLUTE MAARDE 

; SAVE RESULTAAT 

; HAAL mnms, mm - 

5 mmtwem mmttmrns. ^mmirnm 

; HAAL TWEEDE VELD 

; DISTILLEER HORIZONTALE KlXJSDIhWAT 

; BEREKEN HEJ VERSCHIL 

; BERQ<EN ABSOLUTE WAARI^ 

; mmmw jmrn^rmi in rechter nibble 
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K:i£tMNER 



216F 

2170 

2171 

2172 

2174 

2176 

2177 

2179 

217B 

217D 

217F 

2181 

2183 

2185s 

2187 

2189 

218C 

218F 

2191 

2193 

2196 

2198 

219fl 

219C 

219E 

2igF 

2101 

2103 

2105 

2107 

2109 

21 OB 

21 OD 

210F 

21 Bl 

21B4 

21B7 

21B9 

21BB 

21BC 

21BF 

21C1 

21C3 

21C5 

21C7 

21C9 

21CB 

21CD 

21CF 

21D1 

21D3 

21D5 

21D7 

21D9 

21DB 

21 DD 

21DF 

21E1 

21E3 

21E5 

21E7 

21E9 

21ECS 

21EF 

21F1 

21F3 

21F5 

21 F7 

21F9 

21FB 

21FE 

2200 

Z2<t2f 



4fl 
4fl 
18 

65 9C 
85 9C 
60 

05 01 
FO 04 
02 07 
DO 02 
02 03 

05 BO 
65 Bl 

84 B4 
E& B4 

20 FD 20 
20 14 21 
C9 FF 
FO 07 
20 32 21 

06 B4 
DO EF 
05 Bl 

85 B3 
60 

05 01 
FO 04 
02 03 
DO 02 
02 07 
84 95 
84 96 
84 97 
E6 95 

20 FD 20 
20 14 21 
C9 FF 
DO 01 
60 

20 32 21 

06 95 
05 OE 
FO EC 
29 07 
C9 02 
10 E6 
05 OE 
29 40 
45 01 
DO 08 



05 

05 



95 
96 
96 
DO D6 
05 95 
05 97 
85 97 
DO CE 
02 05 
05 B3 
85 Bl 
20 FD 20 
20 14 21 
C9 FF 
DO 06 
84 B7 

84 B8 
FO OD 
E6 Bl 

20 9F 21 
05 96 

85 B7 
AS 97 



> 206 LSRO 

> 207 LSRO 

> 208 CLC 

> 209 ODC 
>210 STO 
>211 RTS 
>212 FIRSTVELDLDO 
>213 BEQ 
>214 LDX 
>215 BNE 
>216 FVl LDX 
>217 FVlfl LDO 
>218 STfi 
>219 STY 
>220 INC 

> 221 FV2 JSR 
>222 JSR 

> 223 CMP 

> 224 BEQ 

> 225 JSR 

> 226 OSL 
>227 BNE 
>228 FV3 LDO 

> 229 STO 

> 230 RTS 
>231 STATUS I LDO 

> 232 BEQ 
>233 LDX 

> 234 BNE 
>235 STATl LDX 

> 236 8TftT2 STY 

> 237 STY 

> 238 STY 
>239 INC 
) 240 STAT3 JSR 
>241 JSR 

> 242 CMP 

> 243 BNE 

> 244 RTS 

> 245 STAT4 JSR 

> 246 OSL 

> 247 LDO 

> 248 BEQ 

> 249 OND 

> 250 CMP 
>251 BPL 

> 252 LDO 

> 253 AND 

> 254 EOR 

> 255 BNE 

> 256 LDA 

> 257 ORA 

> 258 STO 

> 259 BNE 

> 260 STATS LDA 
>261 ORA 

> 262 STO 

> 263 BNE 
}264 STATUSII LDX 

> 265 LDA 

> 266 STA 

> 267 JSR 

> 268 JSR 

> 269 CMP 

> 270 BNE 
>271 STY 

> 272 STY 

> 273 BEQ 
>274 STflTill INC 
>275 JSR 
>276 LDO 
>277 STA 
>27& LDA 



TEMPC 
TEP«PC 

KWIS 

FVl 

#7 

FVIA 

VANVELDHEX 

VERTREKHEX 

BITSTUKIO 

BITSTUKIO 

KODEER 

VELDKONTR 

#*FF 

FV3 

NAARVELD 
BITSTUKIO 

FV2 

VERTREKHEX 
EERSTEVELD 

KWIS 

STATl 

#3 

STAT2 
#7 

TEMPS 

TEMP6 

TEMP7 

TEMP5 

KODEER 

VELDKONTR 

#$FF 

STAT4 

NAARVELD 

TEMPS 

SLASTUK 

STAT3 

#7 

#2 

ST0T3 

SLASTUK 

#$40 

KWIS 

STATS 

TEMPS 

TEMP6 

TEMP6 

STAT3 

TEMPS 

TEMP7 

TEMP7 

STAT3 

#5 

EERSTEVELD 

VERTREKHEX 

KODEER 

VELDKtMTTR 

#$FF 

STATl II 

BITKAZR 

BITKNAZR 

ST0TII2 

VERTREKHEX 

STATUS I 

TEMPS 

BITKAZR 

TEMP? 



TEL RfcSULTATEN BIJ ELKAAR 
RESULTAAT IN TEMPC 

ZET LOOPil^INS UIT 

,1 V'. 

ZiWRT * T 

WIT = 3 

ZET VAN IN VERTREK 
ZET BITSTUKIO OP 01 



; JUMP mjS fl^F I ONSELDIE 



; JUMP TOTDAT LIJN OP IS 
; RESULTAAT IN EER8TEVEL© 



; ZET L00PRICHTIN6 UIT 

; ZWART =3 

; WIT = 7 

; RESET 

; TEMPS = EERSTEVELD 

; JUMP ZOLANB ER 6ELDI6E VEL0EN ZIJN 

; LEFT SHIFT TEMPS VOOR lEDEHE ZET 

; HAAL SLASTUK 

; JUMP ALS SLASTUK « 0 

; JUMP ALS SLASTUK <> PIQN 



; JUMP NAAR PI ON KAZ 

; BEWAAR PIONF^mE 1^1 fN Wm- 



; mm\n pionpositie kaz m iwmi 



; ZET L00PRICHTIN6 Hfm SECMTS ^ 
; EERSTEVELD IN VERTREK»«I 



; JUMP ALS A = FF : SEEN RM 
; ZET BITKODE AANVALfft tN 
; VERDEDI5ER8 mmm «P 

; WERTREKVELD LIST RIJ mm RECHTS 
t MERDEDISERS RECHTS IN BITWIZR 

I iflNymj.Eim RECHTS IN wummn 



3{' 
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: 85 






> ^flO 

/ ^w\^ 




STO 
win 




: 09 


\) J. 




V 9A1 


STflTII2 


1 ny 




■ QS 






\ 9A9 




1 no 




• fl^ 

• OcJ 


D 1 








b 1 H 






r U 


Zv 


\ 9Q/1 




TCD 




■ 9 A 


1 A 


1 

Z X 


\ 9flS 




TCD 


CO 1 o 


■ PQ 

■ U 3 


pp 

r r 




\ 9AP 














^ 9A7 




BNE 


^j:. id 


! AA 
■ DM- 


PQ 
D J 




\ '-■QQ 
/ Zoo 




STY 




' AA 
■ OC4. 


DH 




\ OAQ 




STY 


Xri 


■ r V 






\ 9QA 




BEQ 


'join 




R 1 




\ 9Q1 


STflTII3 


DEC 




■ •■'("1 


QP 


.-, J 
z I 




JSR 




■ 

■ MiJ 


qp 




\ 9QT 




LDO 




: AS 

I Dd 


RQ 




i 9QA 




STft 




! QS 


3 / 








LDfi 




• AS 


RQ 




\ OOP 
/ Z3D 




STfi 




i P.fl 
■ DV 






\ 9Q7 


STflTIIOUTRTS 










■r 




PUT 












r~i n n n rv 

PflfiRD 


LDfl 




! AS 






\ 9 




STfl 




• H ^ 






/ 0 




LDfl 




• AS 






\ /i 




STfl 




■ AA 


OA 
MO 




\ tr 
/ *J 




STY 




! AA 


M J 




\ C 
/ D 




STY 




■ '^("1 

■ 


nn 
uu 






STflRTP 


JSR 






r r 




I 0 




CMP 














BNE 






1 1 




\ 1 A 




JSR 










) 1 1 




RTS 




■ QS 


R(") 




\ 1 9 
/ XZ 


PI 


LDfl 


2243 


■ AS 


R 1 




\ 1 T 




STfl 




9 A 


pn 
r u 




\ 1 /i 




JSR 




AS 


□n 




\ 1 S 
/ID 


P2 


STfl 




■ AS 


QQ 




■> 1 P 
/ID 




STfl 




QS 


QR 
HD 




\ 1 7 

111 




LDfl 




85 


3M 




\ 1 A 




STfl 






A"^ 


*"' 1 


\ 1 d 




JSR 




rl :j 


AS 




V '*/A 




LDfl 




TQ 






V 9 1 
/ Zl 




SEC 






-7L/ 




\ 99 
/ ZZ 




SBC 




AS 






\ 9T 
/ ZO 




CTA 

a 1 H 


H :7 


AP 




S 9 A 




LDfl 


225C 


0\J 






^ 9S 




STfl 






9S 


j£U 


/ ZD 




JSR 






AT 


ZU 






JSR 




HvJ 
AS 


on 

MU 




\ 9A 
/ ZO 


P3 


LDfl 








\ 9Q 
/ Z3 




STfl 




M J 


A A 




V TA 




LDfl 




AS 


3M 




\ T1 




STfl 


0-~:»cp 


■?o 




Z i 


\ T9 
/ uZ 




JSR 




AS 


QA 




S TT 




STfl 


*m*m 1 i ■ 


H J 


ss 

vJiJ 




i TA 




LDfl 


AjC f u ■ 
r iJ 


AS 


QQ 




\ TS 




STfl 




AT 


9 1 


\ TP 
/ u>D 




JSR 


r 0 


1 A 






\ T7 
/Of 




CLC 


007Q • 
i:^.c. r 7 * 


AS 


QA 




i TA 




ADC 


( D ■ 


AS 

OtJ 


QA 




V TQ 




STfl 




DQ 
rl 3 






i AA 




LDfl 


227F! 


38 






> 41 




SEC 


2280 ! 


E5 


94 




>42 




SBC 


2282 : 


85 


99 




>43 




STfl 


2284 ! 


fl9 


10 




>44 




LDfl 


2286: 


85 


gfl 




>45 




STfl 


2288 ! 


20 


25 


20 


>46 




JSR 


228B ! 


20 


03 


20 


>47 




JSR 


228E! 


20 


77 


21 


>48 


P4 


JSR 


2291 : 


fl5 


B4 




>49 




LDfl 


2293: 


C9 


01 




>50 




CMP 


2295! 


DO 


9F 




>51 




BNE 



m fl2 >53 urn 



BUKtrnm 

#1 ; ZET LOOPRICHTINS NflftR LINKS 

EERSTEVELD • immmm3 m VERTREKHEX ^ 
VERTREKHEX . - 

KODEER • T ■ 

VELDKONTR 

#$FF . 

STflTII3 ; JUMP flLS fl = FF : BEEN RIJ 
BITKflZL ; ZET BITKODE flflNVflLLERS EN 
BITKNflZL ; VERDEDISERS LINKS OP 00 
Si ATI I OUT 

VERTREKHEX ; VERTREKVELD LIST RIJ NflftR LINKS 

STATUS I 

TEMP6 

BITKAZL • VERDEDIi^ LINKS IH lIlHiZi 
TEMP7 

BitKNflZL • mmutm links in Bitfi^i 

CHESS 1.3 

#*40 ; VANVELD = 40 

VflNVELDHEX 

#3 ; STUK = PflflRD 

STUKIO 

STUKWRDLOB ; RESET STUKTELLER 

STUKWRDWB 

SCflN 

#*FF ; fl 0 FF : STUK SEVCJNOEW ' 

PI : VERWERK ^ 

TOTAL 

5 RETURN 

VflNVELDHEX ; PI KfMJEERT POSIfir VAN HET STU« 

VERTREKHEX 
KODEER 

POSIT 10 ; AFSTAND PAARD EN KONINS KNAZ 

TEMpg ■ ■ ' ■ 

KONKNflZ 
TEMPfl 
AFSTAND 
#S 

; 5 - AFSTAND PAARD EN KONINS W« 

TEMPC ■ 
TEMP9 .. ! ' 

#*oc ; ^msFmam m +12 

TEMPA 

MULTIPLY 

ADD 

POSIT 10 ; AFSTAMJ pmm - CENTRUH 

TEMP9 

#*44 • cENTmjH • m 

TEMPfl 

AFSTflND -\: 
TEMP4 

#«55 ; CEMT^ • 55 

TEMPA 

AFST^D 

TEMP4 
TEMP4 

#6 ; 6 - AFSTO® PflftlU) - CENTRU*!! 

TEMP4 

TEMP9 \" i" 

#*10 ; WEieFftKTM IS +16 

TEMPA •■■ 

MULTIPLY 

ADD 

FIRSTVELD • ONTWlKmit*® 

BITSTUKID r -. 

#1 ; NiET onmcwKLo imim « 

STARTP 
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5 □ IE! 



2299s 85 


9B 




>54 




STO 


TEMPB 


229B 


P9 


FF 




>55 




LOO 


#*FF 


2290 


85 


9C 




>56 




STO 


TEMPC 


22gF 


20 


03 


20 


>57 




JSR 


flOO 


22fl2 
22fl5 


4C 


36 


22 


>58 




JMP 


STORTP 


ftg 


40 




> 59 


LOPER 


LOO 


#«40 


22R7 


85 


BO 




>60 




STO 


VONVELDHEX 


22fl9 


fi9 


05 




>61 




LOO 


#5 


22flB 


. 85 


OC 




>62 




STO 


STUKIO 


22flD 


84 


08 




> 63 




STY 


STUKWROLOB 


22fiF 


84 


09 




>64 




STY 


STUKWROHOB 


22B1 


84 


00 




>65 


STftRTL 


STY 


VELOTELLER 


22B3 


20 


00 


20 


>6& 




JSR 


SCON 


22B6 


C9 


FF 




>67 




CMP 


#«FF 


22B8S DO 


04 




>68 




BNE 


LI 


22Bfl 


20 


1 1 


20 


>69 




JSR 


TOTAL. 


22BD 


60 






) 70 




RTS 




22BE! fi2 


08 




> 71 


LI 


LDX 


#8 


22C0 


ft5 


BO 




>72 


L2 


LOO 


VflNVELDHEX 


22C2 


85 


Bi 




> 73 




STO 


VERTREKHEX 


22C4 


Cfl 






>74 




DEX 




22C5 


CO 






> 75 




DEX 




22C6 


30 


27 




>76 




BMI 


L5 


22C8 


20 


FD 


20 


)77 


L3 


JSR 


KODEER 


22CB 


20 


14 


21 


>78 




JSR 


VELOKONTR 


22CE 


C9 


FF 




> 79 




CMP 


#$FF 


22D0 


FO 


EE 




>80 




BEQ 


L2 


22D2 


20 


32 


21 


>81 




JSR 


NflflRVELD 


22D5 


■ ft5 


OE 




>82 




LDO 


SLflSTUK 


22D7 


FO 


OE 




>83 




BEQ 


L4 


2209 


29 


40 




>d4 




ONO 


#*40 


220B 


45 


01 




>85 




EOR 


KM IS 


2200 


■ DO 


08 




>8& 




BNE 


L4 


22DF 


fl5 


OE 




>87 




LDO 


SLOSTIM 


22E1 


29 


07 




>6a 




OND 


#7 ^ ■ 


22E3 


• eg 


02 




>89 




CMP 


#2 


22E5 


■ 30 


09 




>90 




BMI 


L2 


22E7 


E6 


00 




>91 


LA 


INC 


VELOTELLER 


22E9 


! 05 


OE 




>92 




LDO 


SLOSTUK 


22EB: FO 


DB 




>93 




BEQ 


L3 


22ED 


DO 


01 




>94 




BNE 


L2 


22EF 


■ 05 


00 




>95 


L5 


LDfl 


VELBTELLER 


22F1 


! 38 






>96 




SEC 


22F2 


E9 


07 




>97 




SBC 


#7 


22F4 


85 


99 




>98 




STO 


TEMP9 


22F6 


■ ft9 


OC 




>99 




LDO 


#$0C 


22F8 


■ 85 


90 




> 100 




STO 


TEMPO 


22Ffl 


: 20 


25 


20 


> 101 




JSR 


MULTIPLV 


22FD 


! 20 


03 


20 


> 102 




JSR 


ADD 


2300 


! 05 


BO 




> 103 


L6 


LDO 


VONVELDHEX 


2302 


! 85 


Bl 




> 104 




STO 


VERTREKHEX 


2304 


! 20 


77 


21 


> 105 




JSR 


FIRSTVELD 


2307 


! 05 


B4 




> 106 




LDO 


BITSTUKIO 


2309 


! C9 


01 




> 107 




CMP 


#1 


230B 
2300 


! 00 


04 




> 108 




BNE 


STflRTL 


• 09 


92 




> 109 




LDO 


#♦92 


230F 


! 85 


9B 




> 110 




STO 


TEMPB 


2311 


! 09 


FF 




> 111 




LDO 


#$FF 


2313 


! 85 


9C 




> 112 




STO 


TEMPC 


2315 


: 20 


03 


20 


> 113 




JSR 


ODD 


2318 


: 4C 


Bl 


22 


> 114 




JMP 


STflRTL 


231B 


: 09 


40 




> 115 


DOME 


LDfl 


#*40 


2310 


: 85 


BO 




> 116 




STfl 


VONVELDHEX 


231F 


! 09 


06 




> 117 




LDO 


#6 


2321 
2323 


! 85 


OC 




> 118 




STfl 


SiUKlO 


: 84 


oa 




> 119 




STY 


SlUKWRDLOB 


2325 


: 64 


09 




> 120 




STY 


S"( UKWRDHOB 


2327 


: 64 


00 




> 121 


STORTD 


STY 


VELOTELLER 


2329 


: 20 


DO 


20 


> 122 




JSR 


SCON 


232C 


: C9 


FF 




> 123 




CMP 


#$FF 


232E 


: DO 


04 




>124 




BNE 


DEEN 



WEESFOKTOR IS -94 



; VflNVELO = 40 
; STUK = LOPER 



RESET STUKTELLER 

■0 

RE^ ¥^y|rELLER 

0 <> FF I STUK BEVONBEN 
VERWERK 



; X = RIGHTING 

; ZOEK IN VOLOENDE RICHTIN6 

; WERK RIGHTING BIJ 

; flLLE RICHTINGEN GEHOD 

; ZOEK IN BEZELFDE RICMnUg 



FF=6EEN 6ELDI6 VELD, VOLSENDE RIGHTING 

. /\ . • • ■ 

STUK KNflZ 



PION KNOZ 

yft It fEW: BE VELDEN 

NOORVELD=LEEG: DOORGOON IN ZELFDE RIGHT INS 
NflflRVELD HEEFT STUK: VOLGENDE RIGHTING 
LJEI f ^RWERKT BE \«LDTELLER 

mi^m^ ^jDEH - 7 y- 

N^^AKTQR « 12 




NIET ONTMIKKELD INDIES BITVSJ) 
U^^MCTOR IS -110 

I^SET STUKTELLER 

RESIT mjsmjLMR 

0 <> FF f STUK mmm£H 

VERWERK 



m 



1.1 r 



33 



S O iE! 



kenme:r 



2330 

2333 

2334 

2336 

2338 

233B 

233D 

233F 

2341s 

2343 

2344 

2346 

2349 

234C 

234E 

2350 

2353 

2355 

2357 

2359 

235B 

235D 

235F 

2361 

2364 
2365 
2367 
2369 
236fi 
236C 
236E 
2371 
2374 
2376 
2378 
2370 
237C 
237F 
2381 

2385 
2387 
238fl 
238D 
2390 
2392 
2394 
2396 
2398 
239ft 
239C 
239E 
23fll 
23fl3 
2305 
23fl8 
23fl9 
23flB 
23flD 
23B0 
23B2 
23B4 
23B6 
23B8 
23B9 
23Bft 
23BC 
23BF 
23C2 
23C4 



20 11 20 
60 

fl5 BO 
85 Bl 

20 FD 



85 flD 
fl2 08 
05 BO 
65 Bl 
CO 

30 15 
20 FD 
20 14 
C9 FF 
FO EF 
20 32 
E6 00 
05 OE 
FO ED 
DO E4 
05 Oft 
85 99 
fl5 05 
4fi 
4ft 
4ft 
4ft 

85 98 
09 09 
38 

E5 98 
85 

20 



20 



20 
21 



21 



9ft 
25 
20 03 



20 
20 



05 
85 
05 
85 



OD 
99 
OB 
9fl 



0 
20 



20 43 21 
05 9C 
85 99 
09 F8 
85 9ft 
20 25 
20 03 
4C 27 23 
09 40 
85 BO 
09 04 
85 ftC 
84 ft8 
84 ftg 
84 fift 
20 DD 
C9 FF 
DO 04 



20 



20 
60 
ft5 
85 



11 20 

BO 
Bl 

20 FD 20 
85 flD 
02 09 
05 BO 
85 Bl 
Cft 
CO 

30 34 
20 FD 
20 14 
C9 FF 
FO EE 



20 
21 



> 126 

> 127 
>128 
>129 

> 130 

> 131 

> 132 
>133 

> 134 

> 135 

> 136 
) 137 

> 138 

> 139 

> 140 

> 141 

> 142 

> 143 
) 144 

> 145 

> 146 

> 147 

> 148 

> 149 

> 150 

> 151 
) 152 

> 153 

> 154 

> 155 

> 156 

> 157 

> 158 

> 159 

> 160 

> 161 

> 162 

> 163 

> 164 

> 165 

> 166 

> 167 

> 168 

> 169 

> 170 

> 171 

> 172 

> 173 

> 174 

> 175 

> 176 

> 177 

> 178 

> 179 

> 180 

> 181 

> 182 

> 183 

> 184 

> 185 

> 186 

> 187 
) 188 

> 189 

> 190 

> 191 

> 192 

> 193 

> 194 
>195 

> 196 
>197 



DEEN 



DTWEE 
DORIE 



DVIER 



DVIJF 



DZES 



mmm 



TOREN 



STflRTT 



n 



T2 
T3 



T4 



JSR 
RTS 

im 

Mn 

STfl 
LDX 

sm 

DEX 
BMI 
JSR 
JSR 
CMP 
BEQ 
JSR 

tm 

LDO 
BEQ 
BNE 
LDO 
STfl 
LDfl 
LSRfl 

ism 

LSRfl 
LSRA 
STfl 
LDfl 

pc 
ssc 

STfl 
JSR 
JSR 

am 

STfl 

LDfl 

STfl 

JSR 

LDfl 

STfl 

LDfl 

STfl 

JSR 

JSR 

JMP 

LDfl 

STfl 

LDfl 

STfl 

STY 

STY 

STY 

JSR 

CMP 

BNE 

JSR 

RTS 

LDfl 

STfl 

JSR 

STfl 

LDX 

LDfl 

STfl 

DEX 

OEX 

BMI 

JSR 

JSR 

CMP 

BEQ 



TOTflL 

VflNVELDHEX 

VERTREKHEX 

KODEER 

POSITIO 

#8 



R 



DZES 
Kl . 
VELl 
#*FF 
DORIE 
NflflRVELD 
VELDTELLER 
SLflSTUK 
DVIER 
DORIE 

VELDTELLER 
TEMPg 

STKNUMKNflZ 



TEMPS 
«9 

TEMPS 
TEMPfl 
MULTIPLY 
flOD 

POSITIO 

TEMP9 

KONKNflZ 

TEMPfl 

flFSTftNO 

TEMPC 

TB1P9 

#*Fe 

TEMPO 

MULTIPLY 

ADD 

STflRTD 
#$40 

VONVELDHEX 
#4 

SlUKIO 

SlUKWRDLOB 

SlUKUpHOB 

VELDTELLER 

SCflN 

««FF 

\l 

VflNVELDHEX 

VERTREKHEX 

KODEER 

POSITIO 

#9 

VflNVELDHEX 
VERTREKHEX 



; RETURN 

; DEEN KODEERT POSITIE VAN MET STUK 



; X » RICHTI*ie 

I ZOEK IN VOLBENDE RiCHTlNS 

; WERK RICHTINS BIJ 

; flLLE R1CHTIN6EN BEHflD 

I IflEK IN DEZELFDE RICHTIMB 



; FF » SEEN GELD I 6 VELD 

; DVIJF TELT OE VELDEN 

; NflflRVELD=LEE6! DUORGflON IN ZELFDE RIGHTING 

5 5!59S^.^!=S. i^F'"'^ S'"^'^' VOLSENDE RICHTIWitr 

; DZES VERWERKT DE VELDTELLER ; 



WEEGFflKTOR 



OflNTOL STUKKEN KNAZ 



; flFSTflND DflME - KONING KNflZ 



; WEE6FflKT13« tS -8 

VflNVELD - 40 

STUK " TOREN 

RESET STUKTELLER 

RESET VELDTELLER 

fl <> FF J STUK BEVONDEN 
VEf»«RK 

; KODEER POSITIE VAN NET STUK 



T7 

KODEER 
VELDKONTR 
#*FF 
T3 



; X » RICHTINS 

; ZOEK IN VOLSEf©! tl«3H#i« 

; WERK RICHTJNi fiiJ 

; flLLE RICHTINGEN BEHflD 

; ZOEK IN DEZELFDE RIGHTING 

; FF-6EEN BELDIS VELD* ZELFDE RICHTIMB 
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23C&: 

23Cg: 

23CEi: 

23CD! 

23CF: 

23D1 ! 

23D3: 

23D5I 

23D7I 

23D91 

23DBI 

23DD1 

23DFI 

23E1 

23E3! 

23E5I 

23E8! 

23Efli 

23EC1 

23EE1 

23F01 

23F2! 

23F41 

23F6! 

23F81 

23FBI 

23FDi 



20 32 21 
PE 

FO IB 
29 40 
45 fll 
DO 15 
fl5 flE 

29 07 
C9 02 

30 D9 
C9 04 
DO 09 
fl9 50 
85 9B 

84 9C 

20 03 20 
E6 Pift 
fi5 flE 
FO CE 
DO C4 
m flO 

85 99 
fl5 OB 
85 9fl 
20 43 21 
AS flfl 
38 

E5 9C 
85 99 
fig 10 
85 9fi 
20 25 20 
20 03 20 
20 77 21 
fl5 B4 
eg 40 
DO 09 
flg DC 
85 9B 

84 9C 

20 03 20 
05 B3 

85 Bl 

20 9F 21 
fl5 96 
DO 45 
05 97 
DO OC 
09 50 
85 9B 
84 9C 
20 03 20 
98 

FO 35 

05 97 
84 B4 
E& B4 
18 

40 

BO 04 

06 B4 
DO F9 
20 E3 21 
05 B4 

OR 
00 

25 B8 
DO IC 
80 

25 BO 
DO 17 
05 B4 
4fl 



/ lyy 




Ton 

JSR 




/ Z\)V 




LDR 




\ OA 1 








\ orio 
/ zUi 




' 


\ OAT 




cDR 


KwIS 


/ ^KJI* 




Okie 


To 


/ ^UD 








\ OAC 

/ ^Od 




/^^^ 


w7 


) 207 








>208 








\ OrtQ 
/ ZU? 




CMP 


#4 


\ 0 1 A 

/ jlIV 




oNE 


To 


/ 4Cl 1 


T5 


LDP 


#(50 


V O 1 o 

/ ^IZ 




STH 


TEMPB 


) J^lCl 




STY 


TEMPC 


> 214 


To 


JSR 


ADD 




INC 


VELDTELLER 


/ ^iD 




LDR 


SLhSTuK 


\ O 1 *7 

f f 




BEQ 


T4 






BNE 


T3 


> iiy 

/ ZjiV 


T7 


1 MA 

LDH 


PQSITIO 




STR 


TEMP9 






LDR 


KONKNflZ 






OTA 

STH 


TEMPH 






JSR 


HFSTHND 


/ Z.JLH 




LUH 


IIP! niT^i ■ r*n 

vELOTELLER 






SBC 






TEMPC 


\ 00"7 




STR 


TEMPS 






LDR 


#♦10 






Sir 


TEMPH 


\ OTA 




JSR 


MULTIPLY 


\ OT 1 




TOO 

JSr 


HDD 


\ OTO 




JSR 


FIRSTVELD 


\ OTT 




LOR 


BITSTlmlQ 


\ OT/t 
/ ^J4 




CMP 


#*A0 






BNt 


TIO 


\ OTC 




LDR 


#*DC 


\ OT7 




STR 


TEMPB 


>238 




STY 


TEMPC 


\ OTQ 




JSR 


HOD 


1 ^4U 


Tlv 


LDH 


EERSTEvELD 


> ^41 




STO 


VERTREKHEX 


\ o/i o 




TOO 

JSR 


STHTUSI 








TtMPb 


\ O/i /■ 
/ Z.44 




BNE 


rtl ITT 

uUTT 


> 245 




LDH 


TEMP7 


I 246 




BNE 


Til 


\ O/i "7 

/ ji4 / 




LDR 


#*50 






STR 


TEMPB 


\ O/i Q 




STY 
JbK 


HOD 


i 0=;i 




T\jr\ 




\ ORO 
/ ^Di 




BEQ 


rtl ITT 

□UTT 


\ ORT 


Til 

111 . 


LDR 


TEMP7 


f JLZi^ 




STY 


O T TTC? Tl liy T n 

BITSTUKIO 


\ o'^'^; 




INC 


BITSTUKIO 






CLC 




/ f 


Ti 1 o 


1 CDQ 
t_SKH 




i OSA 






TUB 


/ JL.^3 




HaL 


BITSTUKIO 


> 2fi0 




RKIP 
0NC1 


T1 1 Q 


>261 


TUB 


JSR 


STATUS II 


>262 




LDH 


BITSTUKIO 


>263 




OSLO 




>264 




TAX 




>265 




AND 


BITKNAZR 


>266 




BNE 


otirr 


>267 




TXfl 




>268 




AND 


BITKNfilL 


>269 




BNE 


PUTT 


>270 




LDA 


BITSTUKIO 


>271 




LSfM 





; NftARVEUP « LEES 

; STUK KNAZ ' ' ' ':' 

; PION KNAZ • 

; STUK <> TOREN KA2 ' ^ 

; OUBBELE TORENS 
; WEESFAKTOR IS +80 

J T6 TELT DE VELDEN 

; NAARVELD«LEEG« flQQRGOAN IN ZELFDE RICHTIls© 
; NAARVELD HEEFT Simt VOLGENDE RIGHTING 
; T7 VERWERKT DE VELDTELLER 
; TEVENS DE AFSTAND TOREN - KONING KNOZ 

1 -(■''• 



; VELDTELLER -AFSTAND t,,ir 



; WEESFAKTOR IS i& 



; T9 I ZEVENDE LIJN 



; BITKODE <> 40 i 6^ 
; WEESFAKTOR » +220 



; Tt0 1 CM5EN LIJN V " r.' , 

jdf^t LIJN NIET OPEN OF HALF OPEN 
JUMP, HALF OPEN LIJN 
WEESFAKTOR IS +&0 v 



Til : HALF OPEN LIJN 

B4 WORDT BITKODE VERST DOORGESCHOVEN 

PION KNftZ 



INDIEN PION KNAZ VERDEDI6D IS, 
SEEN HALF OPEN LIJN 

Ve^DieiNG RECHTS ? 



VERDEDISING LINKS ? 

INDIEN PION NIET AANVHLBOOR, 
SEEN HALF CPEN LIJN 
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245E: 
2460: 
2461: 
2463: 
2465: 
t467: 
2469: 
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I46E: 
t47l: 
^473: 
2475: 
2477: 
2479: 
247B: 
247D: 

2483: 

t4^'! 

|48C: 

t46F: 
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1492: 
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2497: 

2499: 

t49C: 

i49E: 

t4ft0: 

|4ft3: 

i4ft5: 

24fl7: 

24fl9: 

24flB: 

t4ftE: 

24B0: 

24B2: 

24B3: 

24B4: 

24B6: 

t4Ba: 

24B9: 

24Bft: 

24BC: 

246E: 

24BFS 
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24C1: 

24C2: 

24C3: 

24C5: 

24C7: 
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24CD: 

24CF: 

24D1: 

24D3: 

2404: 

24D6: 

24D8: 

24D9I 

240B: 

24DD: 

240E: 

24E0: 

24E2: 

24E3: 



4ft 
ftfl 

25 B7 
DO 05 
8ft 

25 B9 
FO 09 
fl9 20 
85 9B 
64 9C 
20 03 
4C 9C 
ftS 40 
85 BO 
ftS ftl 
FO 06 
09 01 
85 ftC 
DO 02 



84 ft9 
20 DD 

FF 

m 

20 11 

60 

ft5 BO 

85 Bl 
20 FD 
85 ftO 
20 77 
ft5 B3 
85 Bl 
20 9F 
05 96 
85 B5 
05 97 

85 B6 
20 E3 
02 00 
OS B4 
E8 
4ft 

DO FC 

86 B2 
Cft 

Cft 

86 99 
ftS OD 
4A 

4 ft 
4ft 
4ft 
Oft 

B5 CO 
85 9ft 
20 25 
20 03 
02 FF 

m m 

FO 01 
E8 

AS B6 
FO 01 
Cft 

05 B7 
FO 01 
E8 

05 B8 
FO 01 
Cft 

05 B9 



21 



21 



>273 
>274 
>275 
>276 
>277 
>278 
>279 
>280 
>281 
>282 
20 >283 
23 >284 
>285 
:>286 
>287 
>288 
>289 
>290 
>291 
>292 
" >293 

>2g4 

20 >295 
>296 
>297 
20 >29a 
>299 
>300 
>301 
20 >302 
>303 
>304 
>305 
>306 
>307 
>308 
>309 
>310 
>31l 

iili 

>314 
>315 
>316 
>317 
>31S 
>319 
>320 
>321 
>322 
>323 
>324 
>325 
>326 
>327 
>328 
>323 
20 >330 
20 >331 

>3^ 

>^ 

>338 
>33g 
>340 
>341 
>342 
>343 
>344 
>345 



T12 



OUTT 
PION 



PlOfl 
PIOB 

STPRTPI 



PIl 



PI2 



PI3 
PI3ft 



PI4 

PI4ft 
PUB 
PI4G 

PUD 



LSRfl 

TftX 

AND 

BNE 

TXfl 

OND 

BEQ 

LDA 

STA 

STY 

JSR 

JMP 

LDA 

STA 

LDA 

BEQ 

LDA 

STA 

BNE 

STY 

STY 

STY 

JSR 

CMP 

BNE 

JSR 

RTS 

LDA 

STA 

JSR 

STA 

JSR 

LDA 

STA 

JSR 

LDA 

STA 

LDA 

STA 

JSR 

LDX 

LDA 

INX 

Lsm 

BNE 

8TX 

0£X 

DEX 

STX 

LDfl 

LSRO 

LSRO 

LSRO 

LSRfl 

T«X 

LOft 

STO 

JSR 

JSR 

LDX 

LOft 

WEQ 

INX 

LDA 

BEQ 

DEX 

LDA 

BEQ 

INX 

LDA 

BEQ 

DEX 

LDA 



BITKAZR 
T12 

BITKAZL 

OUTT 

«*20 

TEMPB 

TEMPC 

ADD 

STARTT 
#«40 

VANVELDHEX 

KWIS 

PIOA 

«1 

STUKIO 

PIOB 

STUKIO 

STUKWRDLOB 

STUKWRDHOB 

SCAN 

#$FF 

PIl 

TOTAL 

VftNVELDHEX 

VERTREKHEX 

KODEER 

POSITIO 

FIRSTVELD 

EERSTEVELD 

VERTREKHEX 

STATUS I 

TEMP6 

BiTKflZ 

TEMP? 

BITKNAZ 

STATUS II 

#0 

BITSTUKIP , 



PISft 

VERTREKREK 



TEMP9 
POSITIO 



; AANVAL RECHTS ? 
I * ' OPEN 

; HE^AKtim IS ■•■32 



; VANVELD = 40 



; STUK = ZWART PICW 

; STUK = WITTE PION 
; RESET STUKTELLER 



; A <> FF : STUK SEVONO^ 

; VERWERK 

; RETURN ir' ; 

; KODEER POSITIE VftN HBf mm 



; VOORBEREIDING 

; Bl - EERSTEVELD 

; MAAK UIT6EBREIDE BITVOORSTELLING 

; VAN PIONNEN FOWMTIE 

; PIONNEN KAZ 

; PIONNEN KNAZ 

; QPMARS " ■ 

; BER£K@f HfJIIUMMER 



; SflVE RIJNUMMER 

; RIJNUMMER - 2 

; BER^cei UJNNUMMER 



♦CO, X 

TEMPA 

MULTIPLY 

ADD 

#«FF 

BITKOZ 

PI4A 

BITKNflZ 
PI4B 

BITKAZR 
PI4C 

BITKNOZR 

PI4D 

BITKAZL 



• uoiu 

y nHrn. 



rOBEL 



meerde^H© uit S 

X+1 : PION KAZ OP DE LIJN 



X-1 I 



mmz OP M tijM 



X+l : PION KAZ RECHTS 



X-1 I PICW Kmi IStCHTS 



0 
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254F: 
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DO 
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2555: 
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>36 
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1 <i 1 




TA V 

1 HX 






2557: 


25 


B7 




>38 




AND 


BITKOZR 




2559: 


DO 
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tMJTPI 


■ 
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)40 




TXfi 




255C: 


25 


B9 
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Pirn 


BITKftZL 
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DO 
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84 
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TEMP5 
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LDO 


BITSTUKIO 
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2565: 


00 






>46 




OSLO 
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1 


2567 s 


25 


B6 
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BITKNPZR 





; X*l I PION KflZ LINKS 



; X-1 : PION KNPZ LINKS 



WEEBFflKTtW IS +15 



VRIJPIGN 

PION KNPZ OP DE LIJN 

PION KNPZ RECHTS 

^im KNAZ LINKS 

J v' 

; KM^^TEE^^ RIJNUi4l«ER 



; WEE6FPKT0R IS -1-16 



; DUBBELPION 



; WEESFAKIW IS -40 



PION KPZ REC^ftS 



i\sm CMJT * PION KAz mmm 



JUMP OUT « PION KAZ LWm 



; AANVAt REO^TS 
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8C 


82 


1ft 


>383 


S6 


STY 


PBB- 


27FB : 


68 






>384 


S7 


PLfl 




27FC: 


06 


OF 




>385 




LDX 


PZET 


27FE : 


E4 


91 




>386 




CPX 


OZET 


2800: 


DO 


03 




>387 




BNE 


OUTflLL 


2602 i 


CD 


F4 


1ft 


>3a8 




CMP 


TiMeR 

MP. 




4C 2F 28 


>38S 


OUTftLL 


JMP 



ONDERZOEK OF STELLINSWflflRDE 
DE TOT DflN TOE BESTE ZET 

MftflK IN DAT SEVAL PZET 
SELIJK tm 0Z6T 



BELIJKE WflftRDE 

VERGELIJK STELLINeWflflRDE ffBf fts 
TOT DflN TOE BtSTE WflftRDE 



TEL 1-K 



■ mi TOE MMn 'itt 



BESLIS DE BtST^ Z£T 



ONTHOUD Gr<OOTST£ WflftRDE EN 
MflNIPULEER N-ZST EN O-ZET ZODftNIS 
DftT Sy«AKP«QSRftMMft DE BESTE ZET 
VOLBE^ Pmm DOET 

PZET=0 : OZETn 
OF OZET=0 ! PIiT«l 



SCHAKEL DISPLi^ UIT 
mj3TR0UTI|li 
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Letter to the Editor 



Dear till lien, 



I've read your call for more papers to be written in English in the April 
edition of DE 6502 KENNER. Althougih I cannot agree with your remark on Dutch Sjqynd- 
tnf like Chinese to aome of us, I'm hevK*theless strongly In favour of oaing EiigMrti 
as the preferred mi^ns of communication between the members of our club. 
In Mathematics, German authors are usually requested by the editors of German 
scientific journals to submit their fjapera in English. th« argument goes as follows: 
Nothing will be lost (every German scientist has a certain command of the English 
language) and much can be gained (only think of potential readers frqm China, Jappn, 
or the Arabic Countries). I cannot see why the saine argument shotiitl rtbt apply to 'the 
activities of our club. I'm sure the English-speaking members of our club will 
appreciate the double effort the rest of us have to spend with our publications: LJe 
fi^ f«S*ie to flf# «tit to ttt lay fcihat we want to say, imi then find out how to say 
it in English. They will certainly forgive us for occasionally maltr^ting the 
beloved language of Shakespeare, Uilde, and Shaw. 

' FretJ Behringer, MCtt^^en 



^^El ' — * I I g^"* KEIMMEIR 



1 REM "0 D I M S U P E R f E #k M**' ' ■ • • 

2 REM BY GERARD KEET 

3 REM R0DEMBOM6 M0i3 

4 REM 1965BL HEEMSKERK i 

5 REM TEL. 02510-39 763 

7 PRINT CMltClgyi 

8 DIM B(35*2) , . 
10 DIM ASC 35)* AC 3 5, 6) 

tl INPUT ••STAN DEN INLEZEN? <J/N>: "tZS 

12 IF Z$<> "J" THEN 100 • • 

20 PRINT CHRSC 12) : PRINT: PRINT 

23 PRINT •• DE 3DIN-SUPERTEAM-STAND kaRDT NU Da3R HET" 

24 PRINT " PR0GRAMMA GEMAAKT 3F BASIS VAN DE" 

25 PRINT •• KaMPETITIESTANDEN, DIE EERST INGELEZEN" 

26 PRINT " WaRDEN." 

27 PRINT AL MET AL DUURT HET Z3'N 5 MINUTEN" 

28 PRINT VaaRDAT DE STAND 0P HET SCHERM VERSCHIJNT. " 
m PRINT RUSTIG ArWACHTEN DUS MAAR." 

32 F3R 1=1 Ta 9: PRINT "* ") CH R£( 2 1 ) i CHRSC 26) J : N EX T 

33 PRINT + + + + + 

34 1*1 TO 9tPRINT CHR$( 2 1 ) J CHRS( 1 0) i : N EX T: PRIN T 

35 PRINT "♦♦♦♦♦****************************:^^4j^ + ^^^^^^^^i^„ 
100 DATA "DS", "DAM ESSEN I a REN", "HS'S "H EPEN SEN 1 3 REM "DJ" 
no DATA "DAMESJUNiaREN'*, ••HJ", "HERENJUNI3REN", -MA" 

120 DATA "MEI SJESADSFI RANTEN", "JA", "jaN GENSADSPrRl^¥feN«« ' 
130 DATA "MP", "MEISJESPUPILLEN", "JP", "jaNGENSPUPILLEN", "MK" 
tm DATA •WEl SJES^tLPEN'S'MW", "J0NGENSWELFEN" 
145 DATA "DV", "DAMES VETERAN EN" 
200 TT= llTG=0: TP=0:TS=0:KW=24576 

tio IF z$<>"j" TO EN seo 

300 P0KE em, I 

310 X=USR<*"0B02", 0) 

3S0 X= USRC«"I4BC*S 0) 

520 IF PEEK(KW)=48 THEN 800 

530 CAT$=CHRS( PEEK(KW) ) + CHR$( PEEK(KW+ 1) ) 

540 TWaKW+5 

550 TEAMS= "" ' ■ ' . ■ ' : - ' i ■ ' ' ■ 

560 F3R CW=TW Ta TW+3 

570 TEAM$*TEAMf*CHRSf PEEKf eW) ):NEXT CW 

58 0 IF TEAMS= ••3DIN- THEN 600 

59 0 TW=TW+22lIF TW<K W+ 5+ 1 2*22 THEN 550 
59 5 KW=KW+5+l2»ltf mt0 St© 

600 NRS=CHR$(PEEKCTW+5>) »IF NR$<>" " THEN 620 

610 NR$="1" 

620 READ HCAT$ 

630 IF HCATSoCATS THEN 620 

640 READ A$C TT) : A$(TT) = A$< TT)*" "+NR$ 

650 G$«CHRS( PEEK ( TW+ 1 2) ) ♦CMRS( PEEK ( TW+ 1 3) ) 

660 PS=CHR$C PEEK(TW+ 1 4) ) +CHR$C PEEK( TW+ 1 5) ) 

670 V$=CHR$( PEEK(TW+ 16) )+CHRS(PEEK(TW+l 7) ) + CHRS(PEEK( TU-t- 18) ) 

68 0 T S» mnm PE EK C T W+ 1 9 ? > ♦ CH RS« PEB< t TV»+ 2 O) ) ♦ CH R J ( P E EK c t w+ 2 1 ) ) 

69 0 A( TT, 1 ) = V AL ( G$) : AC TT, 2) = VALC PS) t AC TT, 3)= VALC VS) t AC TT, 4lsmi f f ) 
69 2 IF ACTT, 1)<>0 THEN 700 

^ 4 AC TT, &)« IN f C AC TT, 2)* 1 00/ 1 00 

696 A(TT,6) = INTCCACTT,3>-ACTT,4))»100)/100 

698 GaTa 720 



HiBHBHI ■HHHHHV HBHHHVHI ^HVHH^BB ■MMHIH HI^B^MiMMMI^BHM^BBMMHV 



700 A(TT,5) = INT(A<TT,2)*100/A(TT, 1))/100 i 

7 1 0 A( TT, 6)= IN T( ( A< TT, 3) - AC TT, 4) ) * 1 00/ A( TT, 1 ) ) / 1 00 
720 TG= TG+ AC TT, 1 ) : TP= TP+ AC TT* 2) : TS= TS-i- AC TT# 3) - AC TT, 4> 

730 TT=TT+ 1 : REST3RE 
740 63 T3 59 0 

8 00 A( TT, 5> = INTC TP* 1 00/TG)/l DO 

8 10 ACTT, 6'> = INT(TS*100/TG)/100 

9 00 F3R 1=1 T0 TT-2 

9 10 F3R J=I + 1 T0 TT* I 

920 IF ACI, 5)>A( J, 5) THEN 1000 

930 IF A< I , 5)< AC J, 5) THEN 970 

9 40 IF AC I« 6)»«ACJ» 6> mm 1000 

970 HA£=AS( I ) : AS( I ) = A$( J) : AfC J) = HA$ 

98 0 H= AC I, 5) : AC I, 5)= AC J, 5):ACJ#5) = H 

99 0 H=ACI, 6) t ACI# 6) = AC J# 6) t ACJ« 6>=H 
1000 NEXT J 1- - ; 
1010 NEXT I 

1020 G3SUB 11 00: REM PRINT 
1 030 G3SUB 4010: REM VUL AAM 
1040 PRINT CHRSC 12); CHR£C 18); 

1050 G3SUB mim^^ mim miLm ■ 

1060 G3SUB nopsRJEM PRINT DEFINITIEF , ... 

109 0 END 

1 1 00 PRINT CHRSC l$i 

1120 PRI N T "PL AATS"; TABC 1 1 ) "TEAM'*i TAPi36J »*f*4J|4 IS* **l f ABtl^l f Slt.»" 

1121 PRINT 

1 130 FaR 1=1 T0 TT- 1 

1132 XS=STR£C A(I , 5) ) : Y $= STR$C AC I , 6) ) 

1 133 U£=STR£C EC I , 0) ) : V£=STR£CECI, 1) ) : W£=STR£C PCI# 2) ) 
1135 G3SUB ISIO 

1140 PRINT I ; "C "J U£J ••) "J TABC 1 1) A£C I ) ; TABC 35)X £; 

1 1 41 PRINT TABC 45) "C RI GHT£C V£* 4) ; ") "; TABC 54)r £; TABC 63) "C "; Vv£; ") " 
1 1 50 NEXT I : PKim 

1 170 X£=STR£CACTT, 5) ) !Y£=STR£CACTT, 6) ) 
1171 V£= STR£C BC TT, 1) ) : W£=STR£C EC TT* 2) ) 
1 180 GaSUB 1510 

1240 PRINT -VERENI GI N GST3 TAAL "; TABC 35) ;X £; TABC 45) "f *•# RI WTSf %fab 

1241 PRINT ••) "; TABC 54) Y £; TABC 63) "C ••; W£; ") •• 

1245 PRINT: PRINT 

1246 PRINT SPCC 71) ; 
1250 PRINT CHR£C20) 
1260 RETURN 

1500 REM EDIT GETALLEN NAAR XX.XX 
1510 IF I>9 THEN 1530 
1520 PRINT "I 

1530 Z£=V£ 

1531 G3SUB 1610 

1532 VSsES 

1540 7£=W£ 

1541 G0SUE 1610 

1542 W£=Z$ 

1550 Z£=X£ 

1551 G3SUB 1610 
1 552 X$-ZS 

1 560 Z£=Y£ 

1561 G3SUB 1610 
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1562 
159 0 
1600 
1610 
1612 
1615 
1620 
1630 
1640 
1650 
1660 
1670 
168 0 
1700 
1710 
1720 
1730 
1 740 
1750 
18 00 

18 1 0 
1820 
1830 

19 00 
1990 
2000 
3000 
3010 
30! r 
3012 
3013 
3014 
3015 
3020 

3040 
3050 
3660 
3070 
308 0 

3fie#''S 

3100 
3110 

3130 
3140 
3156 
3190 
4000 
4010 
4020 
4030 
409 0 



Y$=Z$ 

RETURN 

REM EDI T Z£ 

IF LEFTICZS* 1 ) = " THEN 1615 

Z$=MIDS;(Z$, 2) 

IF LEN(Z$) = 6 THEN 2000 

IFLEN(Z$)=5 THEN 1990 

IF LEN(Z$)<4 THEN 1700 

IF LEFTSCZS, 1) = ••- " THEN 1660 

Z$=" ••+Z£: 63 T3 199 0 

IF MI D$(Z$* 2, 1) = ". THEN 168 0 

Z £=Z $+ "0": G3T0 199 0 

Z$="-0"+RI GHT$(Z$, 3) : G0T3 1990 

IF LENCZ£)<3 THEN 1800 

IF LEFTSCZ 1) <> ••- •• THEN 1730 

Z$="-0"+RI GHT£(ZS, 2) + "0"! G3 T3 199 0 

IF LEFT$(Z$, 1)<>'". •• THEN 1750 

ZS= •' 0"+Z £; G3T3 199 0 

Z$=" "♦Z$+"0": G3T3 1990 

irLEN(Z$)=l THEN 1900 

IF LEFT$(Z£, n= •■. •• THEN 1830 . ■ 

Z$=Z $+". 00": G3T3 199 0 

ZS=" 0'*+Z$+"0": G0T0 1990 

Z£=" •■+Z $+ ••, 00" 

Z$=" ••+ZS 

RETURN > 
REM PRINTEN U1TLE6 



PRINT 
PRINT 
PRINT 
PRINT 



• •« « * >|( :|( * 41 # 4e 4c « « « « >|c « >)c # 4c 4t 4c * ♦ « 4t « « « « 4< « « >|( * * 41 * >tc >tc • ' 

■■* i 0 I N SUPER f m:" Pi n 



'4c4c4t*4c4c4c*****4t*4c4c4c******4c4c4c*4c4c*4c4c4c4c***4<*" 
PRINT; PRINT 

PR^NT "MET DE SUPERTEAM STAN D KUNNEN DE PRESTATI ES VAN DE TEAMS' 
#Rf>if '^^'VAN aNZE VERENIGING 3NDERLING VERGELEKEN W3RDEN." 



PRINT 
PRINT 
PRINT 
PRINT 
PRINT 

PRINT 
PRINT 

PRINT 
PRINT 
PRINT 

RETURN 

REM INPUT 0UDE STAND 

FglR 1*1 T3 TT- 1 

PRINT "TEAM "l I UN PUT 

NEXT I 

RETURN 



"DE CIJFERS KaMEN ALS V3LGT TaT STANDI" ■ • 

"HET T3TAAL AANTAL UEDSTPIJ DPUN TEN EN HET DaELSALD3" 
"W3RDEN GEDEELD D03R HET AANTAL GESPEELDE WEDSTRIJDEN." 
"DEZE GETALLEN ZIE JE IN DE TWEE K3L3MMEN. " 

"DE PUNTEM ZIJN BELANGRIJKER DAN HET SALD0, NET «.S IN DE" 
••K3MPETITIE ZELF. " 

"V30RPEELD: EEN TEAM HEEFT IN Z ES WEDSTRIJDEN NEfeEN f'WTEN" 
"GEHAALD EN EEN 03 EL SAL D3 VAN 21 P3SITIEF." 
♦•WET GEMIDDELDE AANTAL WEDSTRIJDPUN TEN (K3L3M 1) IS DAN" 
"9 : 6= 1 . 50, HET 03 EL SAL D3 ( 3> I S 21; 6* 3. 50*»l PRIN T 

"TUSSEN HAAKJES DE V3RIGE STAND." 



•*«;pL tS* PN T, SAL D9 > : "t B< I # 6) « B( I * 1 > , B( 1 , 2) 
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6502-Tracer for the N0N/D0S65 coiputer. 

Author: Rene Hettfleisch, The Netherlands. 
Syttti: NflN/SQS65 nwirater 

Uhile prograuing in the asseably-language, a tracer is a 
handy expedient to trace errors in a prograt. For this I 
use the ''6502-t racer" of J. Ruppert (Elektor Holland nr. 
244 Feb. 1984 page 2-66, 2-67), which I adjusted to HON/ 
D0S65. The working of the tracer will be explained in this 
article. The original proorai is given in a hexdmp in the 
article Kntioned above. By this the follwing MMiy-lo- 
cations have to be changed: 



05iC : old $7E, new $FE (chanM of interraDt-victor) 

051D : old $lfl, new $CE 

0521 : old $7F, nm iff 

0522 : old $1R, new $CE 

Ofifll : old MF, new $27 (change of PRBYT) 
i old »12. HM lEO 

06A6 : old $34, new (00 (change of PRCHR) 
06fl7 : old $13, new $E0 

Furtheriore there Mill be a little prograo added before 
and behind the original prograo; refer the source-listing. 
The prograo starts at $046B and ends at $072E. The prograi 
can be used as a utility by saving it on the systet-disk 
and next you have to give the file the 'coMand-tode* by 
oting thi {ETWDEHIIOC filenue. 

Rft«r ttarting the tracer the prograt will ask the start- 
address to be traced. Before doing this the prograa to be 
traced has to be loaded into the oetory. Hatch the overlap 
of the tracerprograi by this. Mhen the startaddress is en- 
tered the tracing will be started. It would be wise to 
send the output to the printer (output-device 2 and 3), 
because the tracing can't be interrupted in the aeantite, 
after which the tracing can continue. The tracing can be 
stopped finally by depressing a randoi key (this causes an 
interruption). Uhen at the end of the prograa Nhich had to 
be traced, a RTS tt60) Hill te Mt, the tracing Mill be 
stopped here. 

After the tracing has been stopped, a RESET has to be gi- 
ven, after which D0S65 has to be restarted. The reason for 
this is that the IRQ-pointer will be detoured and I Mon't 
be able to get it back noraally, so the eoi^Mter it block- 
ed. However you can live with this. 
Stod I«d( Nltn the tracer! 
046B TRACER ORG $046B 



TEMPORARIES AND BUFFERS 



ED 00 
FE CE 
69 04 



OF EO 
OC EO 
09 EO 
48 EO 



$OOED 
$CEFE 
$0469 

fcloe 



MM6S SyBmUTIIES 



START « 
IRQ ♦ 
IRQSAV < 



046B 20 OF EO 
046E 16 
046F 69 
0470 OA 



STRING ♦ 
INKEY ♦ 
OUT » 
CONVRT * 



mm m 



$E00F 
$£00C 
$EO0O 
$E048 



mm 
$iB 













3 




fit f-^ 

0472 36 


r 


'S 


0473 35 




•5 


0474 30 


s 


'0 


0475 32 




'2 


0476 2D 






0477 (4 


s 


't 


0478 72 


s 


'r 


0479 61 


A 


'a 


047A 63 


s 


'c 


047B 65 


s 


'e 


047C 72 


s 


'r 


047D 20 


s 




047E IB 


s 


flB 


047F 6E 


B 


'n 


0480 OD 


B 


tw 


0481 OA 


a 


IM 


AA AA 

0482 Oh 


s 


MA 


0483 47 


s 


'B 


0484 69 


s 


•i 


0485 76 


s 


'v 


0486 65 


s 


'e 


0417 20 


■ 


' 


0488 73 


s 




0489 74 


s 


*t 


048A 61 




*i 


048S 72 


B 


'r 


AX BP ti 

048C 74 


s 


't 


048D 61 


3 


'a 


048E 64 


- 


'd 


04aF 72 


B 


'r 


0490 65 


s 


'f 


A 1114 IMF 

0491 73 


B 


's 


0492 73 


a 


's 


AXOT TA 

0493 3A 


I 


■ 


0494 20 






0495 00 


s 


$00 


A L nf An A A 

0496 A9 00 


LOAIK 


$00 


0498 85 EO 


STA 


STflfiT 


AAMN mm cft* 

WW 89 EE 


STfl 


START 


AX OP AA AP PA 

049C 20 OC EO 


KiCHR JSR 


INKEY 


04SF HH 


TAW 

TAX 




AXAA no An 

04A0 CS OD 


CUPIM 


$0D 


AX AO AA AP 

04H2 DO Ot 


BNE 


GTCHRA 


04M 20 00 EO 


JSR 


OUT 


04fl7 A9 OA 


LDAIM 


$0A 


AXAA AA rA 

04R9 20 00 EO 


JSR 


OUT 


AXAP OA AA rA 

WC 20 00 EO 


JSR 


OUT 


OMr 4C Ed 04 


JM> 


BE6INA 


0412 C9 7F 


6TCHRA CHPIN 


$7F 


04B4 FO IC 


BEQ 


DELETE 


A t. »*■ AA I A ^A 

0416 20 48 EO 


JSR 


CONVRT 


04B9 30 El 


Btl 


6ETCHR 


Axnn A/i 

04B6 A6 


TAY 


A t n A 

04BC 8A 


TXA 




A L nn A A A A A 

04BD 20 00 EO 


JSR 


OUT 


AX PA nA 

04C0 98 


TYA 


04Ci OA 


ASLA 




04C2 OA 


ASLA 




04C3 Oft 


ASLA 




04u4 OR 






(nra 00 w 


LSfW 


«04 


04C7 OA 








on 
KUL 


OTA&T 


04CA 26 EE 


ROL 


imlf 


04CC 88 


DEY 


04CD1)0 F8 


BNE 


LOOPA 


Q4CF 4C 9C 04 


Jl«> 


6ETCHR 



GET CHARACTER '^ 

KEYBOARD 

IF RETURN 

PRINT CR 

PRurr %F Hi iMEs 



IF DELETE 
GO TO DELETE 
CONVERT ASCII TO 
BINARy 

IF mm.mmmr. 

PRINT CHARACTER 
STORE laiR lftliP 



£lEi SOS 



04D2 


20 OF EO 


DELETE 




STRIN6 


REMOVE CHMi FROM 




OA 






tna 

vvO 


SCREEN 










1 






no 






»Uo 




WUO 


w 










wm 


on nA 






AAA 




04DB 


46 EE 




LSR 


START 


^01 ERASE CHARACTER 




Do at 


nun 


CTOBT 


uiur 


CO 
DH 




KUKH 








00 




ncv 






AAC1 


DO Ffi 






1 flnnti 
IJOrp 










' MB 






AACC 


flc cc re 
Ht rt ut 


DCblNH 


1 nv 
LUX 


IRQ 


ShvE IRO-VcbTw 


nATQ 
U4t3 


or cc PC 
HL rr Lt 




I nv 
UlY 


TDfl 

Ilw 


+01 


rtAcr 

U4CL 


or CQ rtA 
Ot 03 U4 




CTV 
blA 


TOnCAIJ 

llwaHV 




Wtr 


or CA AA 

oL OH V4 




CTV 


TOnCAII 


+01 


04F2 


A9 » 






END 


PIfiH 00 ON STACK 


AATA 

Writ 


AO 
40 




KnR 






04F5 


fl9 07 




LDAIN 


END 




rtAC7 


AO 
40 










nAPA 


on nc n 

HU UC LI 




Ll/H 


llATrn 

VHIcK 


STDP uJJCK 


wrB 


43 rr 




HNUin 


%1t 






ffl OE C I 

IvV Vlit 




STA 

win 






0723 


AE 69 04 


END 


LDX 


IRQSAV 


i£T 0RI6INAL IRS-VE 


0726 


AC 6n 04 




LDY 


IRQSAV 




0729 


BE FE CE 




STX 


IRQ 




072C 


8CFFGE 




STY 


IRS 


♦01 



Use of cursor-control -keys ED. 

Author: Rene HettfleiscK, The Netherlands 
NQN/DCIS cetputer 

The Full Screen Editor (ED) for D0S65 is an extended and 
good editor. I think iiany M0N/D0S65 users will agree itith 
•e. In spite of it I think there is one disadvantage by 
the EO: the cursorcontrolling. Ny keyboard naaely has air» 
■or-twifril'-fceys tMxM generates Irhe osttally codes: 

Backspace : $08 , * ; i - . .• * ■< 

Horizontal Tab : $09 
Line Feed : $0A 
Vertical Tab : $0B 

By ED the following keys have to be used for the cursor- 
control: -^D, and -^E. I think it is ankwrd, also 
because «y keyboard doesn't repeat the control-characters. 

The solution 1 found is as folloMs: 
the keyboard-interrupt-routine of D0S65 (which loads the 
characters of the keyboard), will be detoured by a little 
prograji which changes the cursor-control-characters $08, 
$09, $Oft and $0B into "S "D, "S and *E resp. ED not* re^ 
cognizes the character of the cursor-control-keys really 
as cursor-control -keys. 

Hi little prograa you need for this, is as folloHes: 



OEOO AD 11 CI 
0E03 23 FF 
0E05 C9 08 
0E07 DO 05 
0E09 09 13 
OEOB 4C 26 OE 
OEOE C9 09 
9E10 80 0§ 



LDfl $C111 

ANDIM $FF 

CNPIK $08 

m $0E0E 

LDAIM $13 

JHP $0E26 

CMPIK $09 

BNE liE17 











LUHln 


AAA 


AC1 A 


Af* 
4L 


2d 


OE 


Tun 


*AC>C 

$0E26 


0tl7 


C9 


AA 

OR 




CWIM 


$Ofl 


0E19 


DO 


05 




BNE 


$0E20 


OEIB 


A9 


18 




LDAIM 


$18 


OEID 


4C 


26 


Af" 

OE 




$0E26 


0E20 


C9 


OB 




CMPIM 


$0B 


0E22 


nA 

DO 


AO 

02 




BNE 


$0E26 


0E24 


AO 

H9 


AC 

05 




LDRIB 


AAC 

$05 


0E26 


4C 


48 


AB 


J«P 


$AB48 


0629 


AO 

R2 


AA 

00 




t n V TM 

LDXIM 


$00 


0E2B 


AO 


Af" 

OE 




LDYIM 


$<£ 




OP 

oc 




on 


CT» 

31 A 


mlUB 


0E30 


8C 


3C 


AB 


STY 


«AB3C 


0E33 


60 






RTS 




0E34 


A2 


43 




LDXIM 


$43 


0E36 


AO 


AB 




LDYIM 


$AB 


0E3B 


4C 


2D 


OE 


JNP 


$0E20 



The conversion-prograi uses the addresses $0E00-$0E26. At 
$0E29 starts the prograi tnat detoured the pointer in the 
interrupt-orgfiM at $0E00. On I0E34 starts the prograa 
that silt W^Mer in tl* ffilf^Fp«$tfe»k 

To adjust ED the following steps aust be proceeded: 

1. Renaae the editor after itself attf in such a way fftaf ' 
this only can be called by th» GSiMmd EDITOR and not 
by the coa«and ED. This goes as folloin (refer page 24, 
25 D0S65 aanual): 

eiAME EDITOR DUMMY 
RENAME DUMMY EDITOR 

2. Enter the progran from $0EO0 and save it as EDI with 
startaddress $0E29. 6ive the file the coaaand-aode 
(SETHODE -RHDC EOl). 

3. Open a file naaed as S) in the folloNing way: 

CREATE ED 
EDI 

EDITOR 

80 0E34 ! . . 



Now the editor can be called with the coaaand ED. The dis- 
advantage of this aethod is that after the coaaand ED has 
been given a filcnaae can't be entered at once. The editor 
first coaes in the coaaand-aode, after which a file has to 
bi loaded. The advMtage of aaking use of the curtor-con- 
troHcyi is auch iort than ths dtsadvantags. 



The English paperware-service contains for instance: 

- DATBAS; database for Elektor's JUNIOR with OHIO-DOS. Basic. 
Jan van Heuven. The Netherlands. Transl: F. Lopes, Portugal. 

- VDU ROTATING NEWSPAPER. For JUNIOR with VDU. Hachinecode. 
Ivo van Rijssel The Netherlands. ImiAi F« Halland. 

- Centronics Printer Interface; devi#* ft S W'liiaWoSw ft 
Ruud Uphoff, The Netherlands. Hachinecode. 

- The tCfaSOOO aieroprocessor; a new processor in our clui, 
6ert van Opbroek, The Netherlands. Article. 

- DisasseiAler for 6X02 (Rockwell version). Machinecode. 
Nico de Vries, The Netherlands. 

- Disasseabler for 6SC02 (Svnertek/STE version). 
Nice de Vries, The Netherlands. Machinecode. 
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E^E 5 □ iB 

Octopus disks 



KEIMMER 



PtufMor : U. van Asperen 

System : Octopus 65 with OHIO DOS 



After installation of a second disk drive on my dctopus 65 fthis one flo«# Wired 
as drive A, and the original drive as drive B) , it was impossible to boot the 
system 691 m®st disks. I was a novice in the personal computer area, and invokec 
assistance from more experienced Octopus mtm-%. I was advised that fyreblem 
could arise from the head step rate and the delay step rate as read from track 
of a disk on start up of the system. It took me a lot of trials to arrive at 
the values as now used on all disks (micmptt %tm »^r€2«; |«i steal' #6,7,8,9, afltf the 
FORTH disk #10). By exchanging the two drives t could Infest v^ether th# s^tem 
could be booted with the new track O. 



I' 



The values as found for ckrivmm ItHitsubishi H48SS-34|^ with dou&lp step- 

rate, so 40 tracks) are ' 

address 26A3 03 stispi^jtte 

address 26A5 D2 delay step rate 
The track-to-track access time specified for this drive is 6 milliseconds. 
i*t 1 MHz clock frequency the ^^um-mtt 2&|j3 «i# rvmrwmmtW'M step rate of 6 m 
For a 2 MHz system* this values would have to be 06 for 6 ms. 

Fer other beginning users, please find the af>^li-ei^Ie iti»#tr4iet lefts lietow. 
You will need at least one disk / drive combination that is able to boot your 
system. This disk must contain the COP/TO file <on track 36), because you need 
so called Track-zero read /write utility. 

- Boot up the system. 

- exit from the BEXEC* program by hitting the return key (further called <CR>) . 
* JiiiiBp to DOS by entering EX^f mxui <€M> <m^^0l^m-- -rmmpani^mt^ Wif 

- enter CA 0200=36,1 <CR> (to load COP/TO i . e* ttie track O r'ead MTite utility). 

- enter GO 0200 <CR> (start the utility) 

- efltBi*' 2 <CR> (select choice 2 from the menu 1$!* tlie Mtillt'y) ,.-.)..] 

- enter R6200 <CR> (read track O into memory starting at address 620Of • ' 

- enter E <CR> (exit the utility) f '! 

- enter RE M (jump to the monitor programl 

- enter 66A3 and a space (display contents of address 66A3) 

- <)¥n,ter the required value and a slash i.e. 03/ (change step rate) 

- enter the required value and a slash i,e. PS/ i€^^^S^ '^^^^/'^^^fs^:'rilf^:S^- . 

- enter . 0S65D (go back to DOS) ... i r— t 

- mmi&m '^^cy <tM> ietM>*t tt-a^^ R/W utility «^ain) 

- eitter Z <CR> (select choice 2 from the menu) 

- entei^Hi2O0/22OO,8 <CR> (write the changed track O to disk) " ' 

Now you have created a disk that may be able to boot up your system. Please 
note that the required values for address 26A3 and 26A5 may be different for 
eaich drive Cr»#w^ iiBt ^ilwt manual o4 the drive). 

It appears to be very usefull first to make a back-up copy of a disk, before 
ya«i wtxrt changing iipe before. 

I got another hint t# i^Ive a printer hang i.e. the printer stops printing 
before reaching the end ©# m file. This problem can be solved by chan«iiti# 
address 25A9 from 48 to 60 in the same way as described before. 

Please fiote that the MSB of each address is 6 i.s.o 2 when using this fflethod, 
due to the fact that data loaded into memory from address 220O at boot up, are 
now loaded from 6200. 
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Fabelacntig prin ten in kleur of zwartlwit 





OKIMATE 20 




OKI MICROLINE 182 



Futuristische OKI-afdrukkers erkend de OKImate 20 v.a fl 985 -- 

'^!^*frL" ntl?Io,K= Microline 182 v.a. fl. 1170.- 

ledereen betaalbaar geworden. excl b t w Bruto ariviP«!nrii«s 
Aansluitbaar op Commodore 64, BBC, adviespnjs. 

MSX e.a. homecomputers. OKI printers, door computers voor computers. 



Vraag de dealerlljst bij de officieie Importeur 



Technitron B.V. 



Zwaneweg 110, Postbus 14, 1430 AA Aalsmeer ! tel. 02977-22456 - telefax 02977-40968 - telex 13301 



